- gban: Ingyen kellene, de tegnapra
- D1Rect: Nagy "hülyétkapokazapróktól" topik
- sziku69: Fűzzük össze a szavakat :)
- Luck Dragon: MárkaLánc
- sziku69: Szólánc.
- Luck Dragon: Asszociációs játék. :)
- Magga: PLEX: multimédia az egész lakásban
- Navaren: Resident Evil Requiem szösszenet
- Gurulunk, WAZE?!
- f(x)=exp(x): A laposföld elmebaj: Vissza a jövőbe!
Új hozzászólás Aktív témák
-
MartinIsti
csendes tag
-
MartinIsti
csendes tag
válasz
[HUN]Zolee
#393
üzenetére
Köszi a segítséget, végül én a következőt találtam ki kedden a sorok számának megállapítására (persze ehhez az kell, hogy az első üres cella alatt már ne legyen több nem üres cella):
Sub elsourescella()
' Hogyan kell megállapítani az első üres sor helyét
Dim i As Integer ' változó definiálása
i = 3 ' változó alapértékének meghatározása
While Cells(i, 2) <> '''' ' i-dik oszlop vizsgálata az első üres celláig
i = i + 1
Wend
End Sub -
MartinIsti
csendes tag
A múltkori problémámat sikerült megoldanom. Mondjuk sejtettem, hogy egy egyszerű ciklus-utasítás révén menni fog a dolog, csak jól meg kellett ''fogalmazni''.

Most viszont egy olyan átfogó kérdésem lenne, hogy miként lehet az egyes Excel táblák határait megállapítani? Érthetőbben kifejezve: az adott munkalapon szereplő táblázat hány soros és hány oszlopos? Ez ugye ránézésre simán megy, de ha automatizálni akarom a folyamatot, akkor már gondban vagyok, mert makrórögzítés révén nem tudom kisilabizálni a dolgot. Ezenkívül van valamilyen függvény vagy utasítás, amely megállapítja, hogy az adott fájl hány munkalapból áll?
Ha nem teljesen világos a kérdésem, szívesen leírom a segíteni szándékozó kedves emberkének, mi is a pontos feladat, aminek a részeként ezek kellenek.
-
MartinIsti
csendes tag
Sziasztok!
Nagyon kezdő vagyok még a Visual Basicban, és most még csak az Office-ba épített változatával ismerkedem. Két kérdésem volna:
1) Tud valaki tanácsot adni, hogy miként kezdjem el elsajátítani a VB-t (a próbálgatáson kívül, mert most még csak a makró rögzítése alapján ügyeskedem az Excellel)? Esetleg létezik valami jó könyv erről? (A Visual Basic és Excel programozás címűt néztem, az nem az igazi.)
2) Egy egyszerű függvényt akarok létrehozni, amely egy Excel tábla második oszlopában azt figyeli, hogy hányadik sortól kezdve üresek a cellák, ezt az értéket megjegyzi, és az oszlop elemeit az elejétől eddig a sorig másolja át egy eltérő munkalapra.
Ciklusokkal még régen, C64 Basicjénél találkoztam, és bár valamennyire emlékszem rájuk, most valahogy nem sikerül összehoznom a dolgot. A logikája már megvan a fejemben, de nem tudom utasításokba önteni.
Új hozzászólás Aktív témák
- Revolut
- Debrecen és környéke adok-veszek-beszélgetek
- Eredeti játékok OFF topik
- Androidos tablet topic
- Hobby elektronika
- NVIDIA GeForce RTX 5070 / 5070 Ti (GB205 / 203)
- Hardcore café
- E-roller topik
- Intel Core Ultra 3, Core Ultra 5, Ultra 7, Ultra 9 "Arrow Lake" LGA 1851
- AMD Ryzen 9 / 7 / 5 9***(X) "Zen 5" (AM5)
- További aktív témák...
- Katana 15 HX B14WFK 15.6" QHD IPS i7-14650HX RTX 5060 32GB 512GB NVMe magyar vbill gar
- Bomba ár! Asus Zenbook UX563 i7-10G I 16GB I 512SSD I GTX1050 I 15,6" FHD Touch I Cam I W11 I Gari!
- Bomba ár! Lenovo ThinkPad T470s - i5-6GEN I 8GB I 256SSD I 14" FHD I HDMI I Cam I W11 I Gari!
- SAPPHIRE RX 7700 XT 12GB GDDR6 NITRO+ GAMING OC - Új, 1 év garancia - Eladó!
- EliteBook 840 14 G11 14" FHD+ IPS Ultra 5 125H 32GB 512GB NVMe ujjlolv IR kam gar
- 244 - Lenovo LOQ (15IRX9) - Intel Core i7-13650HX, RTX 4060
- 160 - 177 - 178 - Lenovo LOQ (15IRX9) - Intel Core i7-13650HX, RTX 4060 (ELKELT)
- BESZÁMÍTÁS! Sony PlayStation 4 PRO 1TB fekete játékkonzol extrákkal garanciával hibátlan működéssel
- Samsung Galaxy A33 5G 128GB, Kártyafüggetlen, 1 Év Garanciával
- Samsung Galaxy A33 5G, Kártyafüggetlen, 1 Év Garanciával
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest


