|
Autor
|
Thema: Kopf.- und Fußzeile (1053 mal gelesen)
|
mundal
Mitglied
Techniker
   Beiträge: 320
Registriert: 14.02.2005
|
erstellt am: 09. Mrz. 2010 13:52  <-- editieren / zitieren -->   Unities abgeben:          
Hallo Zusammen, ist es in EXCEL 2003 möglich für die erste Seite eine separate Kopf und Fußzeile festzulegen. Alle folgenden Seiten sollen die Kopf.- und Fußzeile der Seite 2 gelten. Gruß
Steffan Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
carsten-3m
Mitglied
Dipl.-Ing. Mbau (Produktmanagement, Patent- und Normwesen)
Beiträge: 950
Registriert: 08.05.2007 Excel 2010
|
erstellt am: 09. Mrz. 2010 13:57 <-- editieren / zitieren --> Unities abgeben: Nur für mundal 
|
Samson53
Mitglied
Nur noch selten simulierend
Beiträge: 119
Registriert: 18.02.2010
|
erstellt am: 09. Mrz. 2010 15:44 <-- editieren / zitieren --> Unities abgeben: Nur für mundal
|
Paulchen
Mitglied
Bauing./SW-Entwickler
Beiträge: 1227
Registriert: 19.08.2004 Büro: Win10 Enterprise 64bit, Office Professional Plus 2013 - Privat: Linux Mint 15, LibreOffice
|
erstellt am: 09. Mrz. 2010 16:35 <-- editieren / zitieren --> Unities abgeben: Nur für mundal
|
Thomas Harmening
Moderator
Arbeiter ツ
    
Beiträge: 2897
Registriert: 06.07.2001 Das Innerste geäussert
und aufs Äusserste verinnerlicht
|
erstellt am: 09. Mrz. 2010 18:20 <-- editieren / zitieren --> Unities abgeben: Nur für mundal
ich tät mal sagen, Code:
Sub gurus_drucken_nicht()
Dim TotalPages As Long
TotalPages = Application.ExecuteExcel4Macro("GET.DOCUMENT(50)")
With ActiveSheet.PageSetup
.RightHeader = "Kukuck, ich bin Seite 1" '(LeftHeader, CenterHeader, RightHeader, LeftFooter, CenterFooter, RightFooter)
ActiveSheet.PrintOut From:=1, To:=1
.RightHeader = "Hai, und ich bin Seite 2 oder grösser "
ActiveSheet.PrintOut From:=2, To:=TotalPages
End With
End Sub
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Foren auf CAD.de (alle Foren)
| 
