-
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
-
Oly
őstag
Sziasztok
Van egy hosszabb makróm, amiből kivettem most egy pár sort:
s = s + 1
Cells(s + 1, 11).Value = DateValue(Now)
Cells(s + 1, 12).Value = Cells(m + 1, 1).Value
Cells(s + 1, 13).Value = "A"
Cells(s + 1, 14).Value = 48
s = s + 1
Cells(s + 1, 11).Value = DateValue(Now)
Cells(s + 1, 12).Value = Cells(m + 1, 1).Value
Cells(s + 1, 13).Value = "A"
Cells(s + 1, 14).Value = 49
s = s + 1
Cells(s + 1, 11).Value = DateValue(Now)
Cells(s + 1, 12).Value = Cells(m + 1, 1).Value
Cells(s + 1, 13).Value = "A"
Cells(s + 1, 14).Value = 31
Cells(s + 1, 15).Value = "ID"
s = s + 1
Cells(s + 1, 11).Value = DateValue(Now)
Cells(s + 1, 12).Value = Cells(m + 1, 1).Value
Cells(s + 1, 13).Value = "A"A félkövérrel kiemelt rész ismétlődik elég sokszor.
Van arra lehetőség, hogy ez csak egyszer szerepeljen a kódban, amit mindig meghívok a megfelelő helyen?
Új hozzászólás Aktív témák
- AKCIÓ! Intel Core i7 6700 4 mag 8 szál processzor garanciával hibátlan működéssel
- Geforce GTX 1050, 1050 Ti, 1060, 1650, 1660 / GT 1030 - Low profile is (LP)
- 27% - DDR5 Notebook 16GB / 32GB / 48GB RAM
- HIBÁTLAN iPhone SE 2020 64GB Red -1 ÉV GARANCIA - Kártyafüggetlen, MS4366
- Asus ROG Strix G16 Notebook! i9-14900HX / RTX 4060 / 16GB DDR5 / 1TB NVMe! BeszámítOK
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest
Fferi50