Hirdetés
- sziku69: Szólánc.
- Luck Dragon: Asszociációs játék. :)
- sziku69: Fűzzük össze a szavakat :)
- f(x)=exp(x): A laposföld elmebaj: Vissza a jövőbe!
- Magga: PLEX: multimédia az egész lakásban
- bambano: Bambanő háza tája
- D1Rect: Nagy "hülyétkapokazapróktól" topik
- Mr Dini: Mindent a StreamSharkról!
- Elektromos rásegítésű kerékpárok
- btz: Internet fejlesztés országosan!
-
LOGOUT
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
-
Delila_1
veterán
válasz
Reinhardt
#33628
üzenetére
Rögzíts egy sort, amiben csak egy nyomtatást hajtasz végre. Ez azért kell, mert a rögzítés tartalmazza, hogy melyik nyomtatóra küldöd az anyagot.
Másold be egy modulba a lenti makrót.
Sub Nyomtat()
Dim napig, nap As Integer
napig = Application.WorksheetFunction.EoMonth(Date, 0)
napig = Day(napig)
For nap = 1 To napig
ActiveSheet.PageSetup.CenterHeader = "Date: " & nap & "/" & Month(Date) & "/" & Year(Date)
'ide jön a rögzített nyomtatási sor
Next
End SubA megjegyzésbe írt 'ide jön... helyére másold be a rögzített sorodat. Mentsd el a füzetet makróbarátként.
A lapról töröld ki a sort, ami most a dátumot tartalmazza, mert ezt a makró az élőfejbe írja majd be.
A makró az aktuális hónap minden napjára elkészíti a nyomtatást, a fejlécben a napi dátummal.
Új hozzászólás Aktív témák
- 2025 - Íme a 48. héten megjelenő játékok listája
- Samsung Galaxy A52s 5G - jó S-tehetség
- Hobby elektronika
- Folyószámla, bankszámla, bankváltás, külföldi kártyahasználat
- Apple asztali gépek
- Okos Otthon / Smart Home
- Renault, Dacia topik
- XPEnology
- A fociról könnyedén, egy baráti társaságban
- Kuponkunyeráló
- További aktív témák...
- BESZÁMÍTÁS! ASUS TUF B760M i9 14900K 32GB DDR4 1TB SSD RX 7900 XTX 24GB ZALMAN Z1 Plus Seasonic 850W
- BESZÁMÍTÁS! MSI B450 R5 5600X 32GB DDR4 512GB SSD RTX 3080 10GB RAMPAGE Shiva Cooler Master 750W
- Bomba ár! Lenovo X1 Yoga 1st - i5-6G I 8GB I 512SSD I 14" FHD Touch I HDMI I W11 I CAM I Garancia
- Készpénzes számítógép PC félkonfig alkatrész hardver felvásárlás személyesen / postával korrekt áron
- Azonnali készpénzes nVidia RTX 4000 sorozat videokártya felvásárlás személyesen / csomagküldéssel
Állásajánlatok
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest
Cég: Laptopműhely Bt.
Város: Budapest
Fferi50
