Hirdetés
- Vivo X300 Ultra - tárcsázz, ha van rá keret!
- Samsung Galaxy S26 Ultra - fontossági sorrend
- Milyen okostelefont vegyek?
- 8000 nit, maradhat? A szaúdiaknál kezd a Honor 600 Pro
- Fotók, videók mobillal
- Bemutatkozott a Poco X7 és X7 Pro
- Mobil flották
- Xiaomi 17 Ultra - jó az optikája
- Samsung Galaxy Z Fold7 - ezt vártuk, de…
- Nem lesz olcsó a Realme GT 8 Pro Európában
-
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
-
hallgat
csendes tag
válasz
Delila_1
#3014
üzenetére
"Másik módja az utolsó sor, ill. utolsó oszlop megkeresésének, arra az esetre, ha a lapon több, egymástól üres sorokkal, oszlopokkal elválasztott adataink vannak:
Kiválasztjuk egy olyan oszloponak az első celláját, amelyikben biztosan folyamatosan vannak az adatok, pl. A1.
Range("A1").Select
Selection.End(xlDown).Select ' ez azonos azzal, mint amikor Ctrl+le-nyilat nyomunk
usor = Selection.Row"
-------------------------------------------------------------------
Sziasztok!Nem egy mai bejegyzése Delilának de éppen ezen vagyok elakadva.

Ha ilyen módon megkerestem az utolsó használt sort, akkor mi a szintaktikája, hogy az "usor" értékét felhasználjam egy másik oszlopban?
Mondjuk munkalap1 B1:T1 celláit (19 cella) transzponálással másolja be munkalap2 B oszlopába a 2. sorától az utolsó soráig kijelölt területre, ismételgetve (ha 190 sor, akkor 10x. Elvileg mindig kijön egészre a sorok száma / 19)Előre is köszönet!!

Új hozzászólás Aktív témák
- Engedélyezte Hollandia a Tesla önvezetést, az EU többi része következhet
- BestBuy topik
- Kerékpárosok, bringások ide!
- Porszívók - akkus és klasszikus vezetékes
- sziku69: Szólánc.
- Vivo X300 Ultra - tárcsázz, ha van rá keret!
- Luck Dragon: Asszociációs játék. :)
- sziku69: Fűzzük össze a szavakat :)
- Párban jönnek a Razer TWS headsetek
- Samsung Galaxy S26 Ultra - fontossági sorrend
- További aktív témák...
- PC Game Pass előfizetés
- MS SQL Server 2016, 2017, 2019
- Windows, Office licencek kedvező áron, egyenesen a Microsoft-tól - Automata kézbesítés utalással is!
- PC Szervizeket, Gépépítőket keresek B2B szoftver partnerségre (E-számlával)
- MEGA AKCIÓ! - Jogtiszta Windows - Office & Autodesk & CorelDRAW - Azonnal - Számlával - Garanciával
- Lenovo ThinkStation P330 Gen 2 Tower i7 / Xeon workstation /számla- garancia
- Dell Latitude E7240 Core I5-4310U CPU / 4GB DDR3 RAM laptop
- ALIENWARE Area-51 R6 Threadripper Edition 1920X
- BESZÁMÍTÁS! MSI Z490 i5 11400 32GB DDR4 512GB SSD GTX 1070 TI 8GB ZALMAN Z1 PLUS Adata 600W
- GYÖNYÖRŰ iPhone 15 Pro Max 256GB Blue Titanium-1 ÉV GARANCIA -Kártyafüggetlen, MS4480
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest


Fferi50
