| |
| Materialien für den 3D-Druck im Hochtemperaturbereich, eine Pressemitteilung
|
Autor
|
Thema: Kopf.- und Fußzeile (1170 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 |