Új hozzászólás Aktív témák
-
Delila_1
veterán
Reggel nem figyeltem eléggé.

Írj az L1 cellába – vagy ehelyett egy olyan cellába, amire biztosan nem lesz szükséged később – egy egyest. Ha másik cellát választasz, mindkét sorban írd át az L1-et.
Sub masol()
Range("A1:E5").Copy Range("A1").Offset(Range("L1") * 5)
Range("L1") = Range("L1") + 1
End SubEz a makró az A1:E5 tartományt annyiszor másolja folyamatosan egymás alá, ahányszor elindítod.
-
Apollo17hu
őstag
Első lépésben egy do while... ciklusban megszámolnám, hány cella van feltöltve az "A" oszlopban. Ezt letárolnám akár változóba, de akár valamelyik cellába ki lehetne íratni, majd ezt felhasználva az
ActiveCell.Offset(6, 0).Range("A1").Select
utasításban a 6-ost kicserélném az 1. lépésben meghatározott változó értékére.
Új hozzászólás Aktív témák
- Luck Dragon: Asszociációs játék. :)
- 5.1, 7.1 és gamer fejhallgatók
- Sony MILC fényképezőgépcsalád
- Crimson Desert
- Így lehet kiszúrni, ha kamu AirPods fülest akarnak eladni neked
- sziku69: Fűzzük össze a szavakat :)
- Le Mans Ultimate
- Samsung Galaxy S23 és S23+ - ami belül van, az számít igazán
- Fotók, videók mobillal
- Samsung Galaxy Watch (Tizen és Wear OS) ingyenes számlapok, kupon kódok
- További aktív témák...
- 27% - ÚJ GAMER PC! Ryzen 9800X3D / RTX 5090 / 48GB 6000MHz / 2TB NVMe / 1250W Gold! BeszámítOK
- ÁRGARANCIA!Épített KomPhone i9 14900KF 32/64GB DDR5 RAM RX 9070 XT 16GB GAMER PC termékbeszámítással
- Wanbo Vali 1 Pro projektor
- HP Z420 Workstation,Xeon E5-1620 CPU,8GB RAM,500GB SATA3 HDD,WIN10
- SzoftverPremium.hu
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest

