Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

Kopf- und Fußzeilen für alle Tabellen eines Sheets

862 views
Skip to first unread message

Friedrich Vosberg

unread,
Jan 5, 2007, 7:07:12 AM1/5/07
to
Moin.

Wie erreiche ich, dass *alle*, also auch die nachträglich eingefügten
Tabellen eines Excelblatts mit den gleichen Kopf- und Fußzeilen
ausgedruckt werden, die ich in der ersten Tabelle definiert habe?

Habe hier ein Datenblatt mir 14 Tabellen und mag das jetzt nicht
unbedingt händisch in 13 Tabellen für jeweils drei Kopf- und
Fußzeilenfelder machen.

Besten Dank im Voraus für jeden Rat und jede Hilfe.

Gruß. Friedrich

--
Kinderlärm ist Zukunftsmusik.

vatolin (at) mac (dot) com

Peter Wolber

unread,
Jan 5, 2007, 7:14:10 AM1/5/07
to
Friedrich Vosberg schrieb:

Hallo Friedrich,

> Wie erreiche ich, dass *alle*, also auch die nachträglich eingefügten
> Tabellen eines Excelblatts mit den gleichen Kopf- und Fußzeilen
> ausgedruckt werden, die ich in der ersten Tabelle definiert habe?

über VBA wäre das machbar (ist aber nicht meine Welt). Ich würde es so
machen: Die Datenblätter gruppieren und dann Daten - Seite einrichten.

Damit werden _alle_ Seiteneinstellungen (nicht nur Kopf- und Fusszeile)
einheitlich nach der ersten Tabelle übernommen.

Gruss
Peter

--
"Wir leben alle unter dem gleichen Himmel, haben aber nicht den
gleichen Horizont." (Konrad Adenauer)

Melanie Breden

unread,
Jan 5, 2007, 7:16:11 AM1/5/07
to
Hallo Friedrich,

Friedrich Vosberg schrieb:


> Wie erreiche ich, dass *alle*, also auch die nachträglich eingefügten
> Tabellen eines Excelblatts mit den gleichen Kopf- und Fußzeilen
> ausgedruckt werden, die ich in der ersten Tabelle definiert habe?
>
> Habe hier ein Datenblatt mir 14 Tabellen und mag das jetzt nicht
> unbedingt händisch in 13 Tabellen für jeweils drei Kopf- und
> Fußzeilenfelder machen.

rufe im ersten Tabellenblatt mit den fertigen Kopf- und Fußzeilen
das Dialogfenster der Kopf- und Fußzeilen auf und beende das
Dialogfenster wieder mit Klick auf OK.

Wechsel dann einzeln zu den anderen Tabellenblättern und drücke jeweils die Taste 'F4'

Dadurch werden die Einstellungen der Kopf- und Fußzeilen des ersten Blattes auf
die anderen Blätter übertragen.


Mit freundlichen Grüssen
Melanie Breden

--
- Microsoft MVP für Excel -
www.melanie-breden.de

Peter Wolber

unread,
Jan 5, 2007, 7:17:46 AM1/5/07
to
Friedrich Vosberg schrieb:

Hallo Friedrich,

> Wie erreiche ich, dass *alle*, also auch die nachträglich eingefügten


> Tabellen eines Excelblatts mit den gleichen Kopf- und Fußzeilen
> ausgedruckt werden, die ich in der ersten Tabelle definiert habe?

Jetzt habe ich doch noch einen VBA-Code gefunden:

Sub Kopf_und_Fusszeile_setzen()
'Auf jedem Tabellenblatt wird die Fusszeile gesetzt
'Quelle: unbekannt
Dim ws As Worksheet

For Each ws In Worksheets
With ws.PageSetup
.LeftHeader = "" 'Kopfzeile lins
.CenterHeader = "" 'Kopfzeile mitte
.RightHeader = "" 'kopfzeile rechts
.LeftFooter = "" 'Fußzeile links
.CenterFooter = ""
.RightFooter = "Seite &P von &N"
End With
Next ws
End Sub


Gruss
Peter

--
"Eine Erfolgsformel kann ich nicht geben, aber ich kann sagen,
was zum Mißerfolg führt: der Versuch, jedem gerecht zu werden."
(Herbert Bayard Swope)

Harri Märki

unread,
Jan 5, 2007, 7:26:00 AM1/5/07
to
Hallo Friedrich

"Friedrich Vosberg" wrote:

> Moin.
>
> Wie erreiche ich, dass *alle*, also auch die nachträglich eingefügten
> Tabellen eines Excelblatts mit den gleichen Kopf- und Fußzeilen
> ausgedruckt werden, die ich in der ersten Tabelle definiert habe?
>
> Habe hier ein Datenblatt mir 14 Tabellen und mag das jetzt nicht
> unbedingt händisch in 13 Tabellen für jeweils drei Kopf- und
> Fußzeilenfelder machen.

Halte die Ctrl Taste gedrückt und markiere alle Tabellenblätter. Dann gehst
du in die Ansicht für die Kopf-/Fusszeile, machst Deine Anpasungen und
drückst dann auf OK. Somit wird die aktuelle Kopf oder Fusszeile für alle
Tabellenblätter übernommen.

Nur So als Bemerkung: wenn man alle Sheets markiert hat, kann man auch einen
Wert oder Formel in die gleiche Zelle reinschreiben. Damit würde sich
Copy/Paste erübrigen.

> Besten Dank im Voraus für jeden Rat und jede Hilfe.
>
> Gruß. Friedrich

Gruss Harri

Robert Feldmann

unread,
Jan 5, 2007, 8:35:26 AM1/5/07
to
Hallo Friedrich,

soweit ich mich erinnere konnte man im Startverzeichnis von Excel zwei
Dateien ablegen die als Muster für "Neue Datei" und "Neues Blatt"
dienen. Sie müssen Mappe.xls und Tabelle.xls heißen. Diese können
beliebige Formatierungen und ähnliches enthalten das immer zur Anwendung
kommt wenn man eine neue Mappe bzw. ein neues Blatt erzeugt.

Ich kann das im Moment nicht testen, bin mit dem WWW Account angemeldet,
der darf fast nix. Und in den Pfad "C:\Programme\Microsoft
Office\OFFICE11\XLSTART" darf er auch nix schreiben.

Probier's doch mal aus.

bis dann
Robert

Friedrich Vosberg schrieb:

Friedrich Vosberg

unread,
Jan 5, 2007, 9:06:28 AM1/5/07
to
Robert Feldmann <ros...@web.de> wrote:

> C:\Programme\Microsoft Office\OFFICE11\XLSTART

Ups. Vielleicht hätte ich dazu sagen sollen, dass ich Excel 2004 v11.3
unter MacOS X 10.4.8 verwende. Der Tipp von Melanie Breden mit F4 [1]
funktioniert nämlich so auch nicht.

Gruß. Friedrich

[1] 459e4189$0$18834$9b4e...@newsspool4.arcor-online.net

Robert Feldmann

unread,
Jan 5, 2007, 6:03:55 PM1/5/07
to
Hallo Friedrich,

gibt es unter der genannten Konstellation kein solches Startverzeichnis?
Wo würde denn die Personl.xls liegen?

Bis dann
Robert

Friedrich Vosberg schrieb:

0 new messages