-
Fototrend
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
-
Fferi50
Topikgazda
válasz
alfa20
#26598
üzenetére
Szia!
Nem tudom, hogy a tömb-e az optimális megoldás ebben az esetben. Én valószínűleg másképp valósítanám meg.
Pl a betűket és a számokat egymás mellé írnám egy szöveges változóban szép sorban, valamivel elválasztva.
Ezután instr függvénnyel megkeresném a szövegben az A1 cella értékét, és a hozzá tartozó számértéket kinyerhetem a következő elválasztójel után.Vagy: használnám a Collection objektumot. Létrehoznék egy Collection típusú változót. A collection tartalmazhat egy kulcsot, ami jelen esetben a betű lenne, valamint egy, a kulcshoz tartozó értéket, ami a betűhöz tartozó szám. A számot úgy lehet elérni, hogy a Collection-ban a betű elemre hivatkozol.
Pl.
sub szamos
dim betuszam as new collection
betuszam.add key:="aa",item:=11
betuszam.add key:="bb",item:=22
msgbox betuszam("aa")
msgbox betuszam("bb")
end subÜdv.
Új hozzászólás Aktív témák
- Házimozi belépő szinten
- The Division 2 (PC, XO, PS4)
- Jövedelem
- Milyen asztali (teljes vagy fél-) gépet vegyek?
- Robotporszívók
- Linux kezdőknek
- AMD Ryzen 9 / 7 / 5 / 3 3***(X) "Zen 2" (AM4)
- Honor Magic6 Pro - kör közepén számok
- Xbox tulajok OFF topicja
- Vivo X300 Ultra - tárcsázz, ha van rá keret!
- További aktív témák...
- HP. Laptop. i5. Model: 15-da1002nq
- Vírusirtó, Antivirus, VPN kulcsok GARANCIÁVAL!
- Game Pass Ultimate előfizetések 3 - 36 hónapig azonnali kézbesítéssel a LEGOLCSÓBBAN! AKCIÓ!
- Windows, Office licencek kedvező áron, egyenesen a Microsoft-tól - Automata kézbesítés utalással is!
- Kaspersky, BitDefender, Avast és egyéb vírusírtó licencek a legolcsóbban, egyenesen a gyártóktól!
- Magyarország piacvezető szoftver webáruháza
- 27% - Corsair Premium Individually Sleeved TÁPEGYSÉG KÁBEL Pro Kit Type 4 Gen4
- HP EliteBook 640 G10 - 14" FullHD IPS - i5-1335U - 8GB - 512GB - Win11 - 1 év garancia - MAGYAR
- Lenovo Thinkpad E495 Ryzen 5 3500U, Radeon Vega 8, 8-16GB RAM, SSD, jó akku, számla, gar
- Samsung PM9E1 "9100 PRO" 2TB M.2 NVME Gen5 x4 SSD! 14.000-12.500MB/s
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest
Fferi50