Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Kopf- und Fußzeile in allen Ausdrucken gleich

Kopf- und Fußzeile in allen Ausdrucken gleich
05.08.2005 13:01:27
gerhard
Liebe Excel-Experten,
in meinem Programm habe ich 20 Arbeitsblätter, welche für den Anwender zum
Ausdruck zur Verfügung stehen.
Über ein Schaltfläche sollten alle Arbeitblätter das gleiche "Layout" in
Bezug auf Hoch-, Querformat, Kopf- und Fußzeile erhalten.
So sollte in der Kopfzeile stehen:
Links (Datum) Mitte (Überschrift) rechts (Seite von Seiten)
In der Fußzeile:
Links (Datum) Mitte (Anwender) Rechts (Dateinname)
Wie sieht hier die Programmierung aus?
Bitte um Hilfe
Danke im Voraus
Gerhard
Anzeige

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Kopf- und Fußzeile in allen Ausdrucken gleich
05.08.2005 13:10:44
=Peter=
Hallo Gerhard,
erstelle ein Tabellenblatt mit Kopf-und Fußzeilen, wie es als allgemeine Vorlage verwendet werden soll. Diese Datei wird unter dem Namen "Mappe.xlt" im XLStart-Ordner: C:\Dokumente und Einstellungen\BenutzerName\Anwendungsdaten\Microsoft\Excel\XLStart gespeichert.
Diese Mappe erfüllt den gleichen Zweck wie bei Word die Mappe "Normal.dot".
HTH
Gruß
Peter
Anzeige
AW: Kopf- und Fußzeile in allen Ausdrucken gleich
05.08.2005 13:13:40
Matthias
Hallo Gerhard,
zeichne es für ein Blatt auf und schreibe drumrum:

Dim sh As Worksheet
For Each sh In ThisWorkbook.Sheets
' hier deine Aufzeichnung
Next sh

Im aufgezeichneten Code musst du alle "ActiveSheet" durch "Sh" ersetzen
Gruß Matthias
Anzeige
AW: Kopf- und Fußzeile in allen Ausdrucken gleich
05.08.2005 13:14:38
gerhard
Wie kann ich diese Mappe.xlt für die bestehenden, manuell formatierten Arbeitsblätter überschrieben werden?
Der Anwender ist variabel. Wie bekomme ich eine Varible in die Fußzeile?
AW: Kopf- und Fußzeile in allen Ausdrucken gleich
05.08.2005 13:17:22
Matthias
Hallo Gerhard,
siehe meine Antwort oben und:

.CenterFooter = Application.Username

Gruß Matthias
Anzeige
AW: Kopf- und Fußzeile in allen Ausdrucken gleich
05.08.2005 13:15:32
Peter
Servus,
Excel hat ein wunderbares Mittel um Code herauszubekommen, den Macrorecorder.


      
Sub t()
Dim sh As Object
For Each sh In Application.Worksheets
    
With sh.PageSetup
        
'Einstellung Kopfzeile
        .LeftHeader = ""
        .CenterHeader = ""
        .RightHeader = ""
        
'ENDE Einstellung Kopzeile / Beginn Einstellung Fusszeile
        .LeftFooter = "f"
        .CenterFooter = "f"
        .RightFooter = "f"
        
'ENDE Einstellung Fusszeile / Einstellung Querformat
        .Orientation = xlLandscape
        
'ENDE Einstellung Querformat
    End With
Next
End Sub 


MfG Peter
Anzeige
AW: Kopf- und Fußzeile in allen Ausdrucken gleich
05.08.2005 13:21:52
gerhard
Danke für die Hilfe
geschlossen - o.T.
05.08.2005 13:23:33
Matthias
-
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige