- sziku69: Fűzzük össze a szavakat :)
- D1Rect: Nagy "hülyétkapokazapróktól" topik
- Gurulunk, WAZE?!
- urandom0: Kicsit most elfáradtam...
- sziku69: Szólánc.
- gban: Ingyen kellene, de tegnapra
- Luck Dragon: Asszociációs játék. :)
- btz: Internet fejlesztés országosan!
- Meggyi001: Kuponok....
- eBay-es kütyük kis pénzért
-
LOGOUT
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
-
lappy
őstag
válasz
Warton #49179 üzenetére
Function SingleCellExtract(Lookupvalue As String, LookupRange As Range, ColumnNumber As Integer)
Dim i As Long
Dim Result As String
For i = 1 To LookupRange.Columns(1).Cells.Count
If LookupRange.Cells(i, 1) = Lookupvalue Then
Result = Result & " " & LookupRange.Cells(i, ColumnNumber) & ","
End If
Next i
SingleCellExtract = Left(Result, Len(Result) - 1)
End Functiona makrót a Module-ba kell helyezni
az alábbi saját függvénnyel =@Singlecellextract(E3;$B$3:$C$7;2) -
föccer
nagyúr
válasz
Warton #49179 üzenetére
Függvénnyel
Előbb keresd meg, hogy hány darab van az adott iktatóból. hol.van függvénnyel keresd meg, hogy hol van az oszlopban elsőként, majd index-el keresd ki az adott pozícióban lévő nevet.
A hol.van függvénybe a keresés tartomány elejét indirekt függvénnyel kell megadni, ahol a sor poziciót a hol.van föggvény találatát kell alapul venni +1-el.
Előbb meg kell nézni, hogy mennyi az azonos iktatóhoz tartozó maximum darabszám. Kimásolod egy külön oszlopba, ismétlődések eltávolítása, majd mellé egy darabhatöbb függvénnyel összeszámoltatod.
üdv, föccer
-
lappy
őstag
válasz
Warton #49179 üzenetére
=INDEX($C$3:$C$7;KICSI(HA(($E$3=$B$3:$B$7);SOR($B$3:$B$7)-MIN(SOR($B$3:$B$7))+1;"");SOROK($A$1:A1)))
Tömbképlettel
C3 : C7 : nevek
B3 : B7 : cikkszám
E3 : keresett cikkszám
következő találathoz a képletben az A1 helyett A2 és így továbbtömbképlet nélkül
=@INDEX($C$3:$C$7;KICSI(INDEX(($E$3=$B$3:$B$7)*(HOL.VAN(SOR($B$3:$B$7); SOR($B$3:$B$7)))+($E$3<>$B$3:$B$7)*1048577;);SOROK($A$1:A2)))
Új hozzászólás Aktív témák
- Gitáros topic
- Xiaomi 14T - nem baj, hogy nem Pro
- PlayStation 5
- Mibe tegyem a megtakarításaimat?
- Kuponkunyeráló
- Vicces képek
- sziku69: Fűzzük össze a szavakat :)
- One otthoni szolgáltatások (TV, internet, telefon)
- D1Rect: Nagy "hülyétkapokazapróktól" topik
- Milyen egeret válasszak?
- További aktív témák...
- AKCIÓ! Jogtiszta Windows - Office & Vírusirtó licencek- Azonnal - Számlával - Garanciával - Nint.hu
- PC Game Pass előfizetés
- Antivírus szoftverek, VPN
- Kaspersky, BitDefender, Avast és egyéb vírusírtó licencek a legolcsóbban, egyenesen a gyártóktól!
- Adobe Előfizetések - Adobe Creative Cloud All Apps - 12 Hónap
- BESZÁMÍTÁS! Acer KG251QF 24 144Hz FHD TN 1ms monitor garanciával hibátlan működéssel
- Apple iPhone 13 Mini 128GB,Dobozával,12 hónap garanciával
- ÁRGARANCIA!Épített KomPhone Ryzen 7 9800X3D 32/64GB DDR5 RAM RTX 5070 12GB GAMER termékbeszámítással
- HIBÁTLAN iPhone 13 Pro 128GB Sierra Blue -1 ÉV GARANCIA - Kártyafüggetlen, MS3388
- Samsung Galaxy A13 64GB, Kártyafüggetlen, 1 Év Garanciával
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest