Hirdetés
- Xiaomi 15T Pro - a téma nincs lezárva
- Samsung Galaxy Watch (Tizen és Wear OS) ingyenes számlapok, kupon kódok
- Poco F5 - pokolian jó ajánlat
- Samsung Galaxy S26 Ultra - fontossági sorrend
- Új belépő a Honornál
- Poco F8 Ultra – forrónaci
- Íme az új Android Auto!
- iPhone topik
- Fotók, videók mobillal
- Microsoft Rewards
-
Mobilarena
A Microsoft Excel topic célja segítséget kérni és nyújtani Excellel kapcsolatos problémákra.
Kérdés felvetése előtt olvasd el, ha még nem tetted.
Új hozzászólás Aktív témák
-
Pakliman
tag
Sub btRogzit_Click()
Dim sor As Long
Dim lMax As Long
Dim l As Long
Dim emptyRow As Long
Munka2.Activate
emptyRow = WorksheetFunction.CountA(Range("A:A")) + 1
For sor = 1 To emptyRow - 1
If Cells(sor, 1) Like "KSZ-#*" Then
l = Mid(Cells(sor, 1), 5)
If l > lMax Then lMax = l
End If
Next sor
Cells(emptyRow, 1).Value = "KSZ-" & lMax + 1 'tbSorszam.Value -> többé nem kell:)
Cells(emptyRow, 2).Value = tbElado.Value
Cells(emptyRow, 3).Value = tbBrutto.Value
Cells(emptyRow, 5).Value = cbEv.Value & "/" & cbHonap.Value & "/" & cbNap.Value
Unload Me
End Sub -
#23524
m.zmrzlina
senior tag
kutga
#23519
m.zmrzlina
senior tag
Szerintem ez a feladat egyszerűen megoldható (feltéve, ha jól értem a problémát).
Tegyük fel, hogy nagyjából úgy néz ki a munkafüzeted ahogy kettővel lejjebb Wyll lerajzolta
Csinálsz egy munkalapot ebbe a munkafüzetbe, legyen a neve mondjuk "összesítő"Erre a munkalapra kialakítod a számodra legmegfelelőbb szerkezetet és a megfelelő helyekre behivatkozod azokat a cellákat aminek a tartalmát látni szeretnéd.
A képen most a cellák képleteit látod de ha beírod a képletetet akkor a hivatkozott cella tartalmát fogod látni.
-
Mittu88
senior tag
Úgy érted több munkalappal van egy táblázatod, és munkalaponként vannak a partnerek?
Ha igen, minden munkalapon ugyanabban a cellában található(ak) ez(ek) az adatok?
Szerk.: mivel külön munkalapon, vagy munkafüzetben vannak az adatok, szerintem egyszerűen nem lehet megoldani (bár ez relatív). Makró kell. Ahhoz értesz picit?
-
bandus
veterán
igazából ez is egyfajta szűrő, nagy mennyiségű adat kezelésére. cska kicsit byonolultabb, több lehetőséggel. de ha neked minden projektre külön munkalapon van szükséges, akkor nem ez a megoldás.
valami makró biztosan meg tudja ezt csinálni, valami kompetensebb ember tud majd segíteni benne
-
-
brd
nagyúr
Egyszerűbben nem tudtam, mert most hirtelen nem találtam olyan képletet, ami 3 eredményt tudna adni. Mátrix függvényekkel egyébként szebben is meg lehetne oldani, de arra most nincs időm.
Az egész alábbit másold be az "A" oszloptól (az üres helyek jelentik elvileg az oszlophatárt), és a C-G-t el kell majd rejtened:10 11 =HA(B1>A1;1;0) =HA(A1=B1;1;0) =HA(D1=1;"Egyenlőek";"") =HA(ÉS(D1=0;C1=0);"Nagyobb";"") =HA(ÉS(D1=0;C1=1);"Kisebb";"") =ÖSSZEFŰZ(E1;F1;G1)
Aham, kiveszi a tabulátort.
Akkor mentsd le a fentit szövegfile-ként és nyisd meg az Excel-lel, majd mondd meg neki, hogy a space határolja az oszlopokat. -
Delila_1
veterán
A Munka1 lapra írd be az alábbit, feltételezve, hogy az A oszlopban van az az adat, amit a Munka2 lap A oszlopának adataival össze kell vetned. A $1000 helyett a Munka2 utolsó sorát írd. Végig másolva 0-át ír a Munka2-n nem található tételek mellé, 1-et a mindkét lapon szereplőkhöz.
Ha a Munka2-re is beírod ugyanezt (persze Munka1!-re változtatva a Munka2!-t), akkor az ott meglévő, de a Munka1-en nem szereplő tételeket is kimutathatod.
Sikerült úgy megfogalmaznom, hogy egy mukkot se lehessen érteni belőle? Ennyi telik tőlem.
=HA(HIBÁS(FKERES(A1;Munka2!$A$1:$A$1000;1;HAMIS));0;1)
Ezután már szűrheted 0-ra, vagy 1-re az oszlopodat.
Akkor mentsd le a fentit szövegfile-ként és nyisd meg az Excel-lel, majd mondd meg neki, hogy a space határolja az oszlopokat.Új hozzászólás Aktív témák
Hirdetés
Fferi50- Konzolokról KULTURÁLT módon
- Xiaomi 15T Pro - a téma nincs lezárva
- Samsung Galaxy Watch (Tizen és Wear OS) ingyenes számlapok, kupon kódok
- Ubuntu Linux
- A fociról könnyedén, egy baráti társaságban
- Poco F5 - pokolian jó ajánlat
- 4K vs 8K – Megéri-e a 8K TV 2026-ban?
- Túllépne a DRAM limitjein a Neo Semiconductor-féle 3D X-DRAM
- Autós topik
- Graphics: Telefonvásárlási kálváriám....avagy clickbait cím: Horror a hardveraprón
- További aktív témák...
- HP Victus Gaming Laptop INTEL I7-14700HX / RTX 4070 32GB RAM 1TB SSD 144Hz Gari
- ÁRGARANCIA!Épített KomPhone Ryzen 7 5700X 32/64GB RAM RTX 5060 Ti 8GB GAMER PC termékbeszámítással
- AZONNAL KÉSZLETRŐL! Intel Core i5 14600K 32GB 6000MHz RAM 2TB Gen4 SSD RTX 5060 8GB FSP 750W
- Új HP 15 Victus FHD IPS 144Hz i5-13420H 4.6Ghz 16GB RAM 512GB SSD Nvidia RTX 3050 6GB Win11 Garancia
- Apple iPhone 13 Pro Max 128GB, Kártyafüggetlen, 1 Év Garanciával
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest