4
Word Makro - Kopf-Fusszeile der Folgeseite (Seite 2) bearbeiten
Hallo zusammen,
ich habe bisher noch keine Lösung für folgendes Problem gefunden:
Ich habe eine Wordvorlage, welche 1-X Seiten haben kann. Seite 1 hat ein anderes Layout wie die Folgeseiten. Nun geht es darum, dass sowohl auf Seite 1, als auch den Folgeseiten das Logo per Makro ausgetauscht werden soll. Auf Seite 1 funktioniert das Ganze soweit (über HeaderFooter.Firstpage komme ich an die Position und tausche das Element aus). Gibt es auch eine Funktion wie HeaderFooter.Firstpage, welche die Folgeseite automatisch ansteuert? Falls nicht, wie kann ich das Problem am sichersten lösen? Die Grafik auf der Folgeseite soll auch ausgetauscht werden, wenn die Folgeseite aktuell nicht verwendet wird (einfach aus dem Hintergrund, dass wenn sich das Dokument Seitenmäßig vergrößert, dann schon die richtige Grafik auf Seite 2 erscheint).
Über Hilfe würde ich mich sehr freuen.
Grüße
Lukas
ich habe bisher noch keine Lösung für folgendes Problem gefunden:
Ich habe eine Wordvorlage, welche 1-X Seiten haben kann. Seite 1 hat ein anderes Layout wie die Folgeseiten. Nun geht es darum, dass sowohl auf Seite 1, als auch den Folgeseiten das Logo per Makro ausgetauscht werden soll. Auf Seite 1 funktioniert das Ganze soweit (über HeaderFooter.Firstpage komme ich an die Position und tausche das Element aus). Gibt es auch eine Funktion wie HeaderFooter.Firstpage, welche die Folgeseite automatisch ansteuert? Falls nicht, wie kann ich das Problem am sichersten lösen? Die Grafik auf der Folgeseite soll auch ausgetauscht werden, wenn die Folgeseite aktuell nicht verwendet wird (einfach aus dem Hintergrund, dass wenn sich das Dokument Seitenmäßig vergrößert, dann schon die richtige Grafik auf Seite 2 erscheint).
Über Hilfe würde ich mich sehr freuen.
Grüße
Lukas
Share on Facebook
Share on Twitter
Share on Reddit
Share on LinkedinPlease also mark the comments that contributed to the solution of the article
Content-Key: 197007
Url: https://administrator.de/contentid/197007
Printed on: April 16, 2024 at 11:04 o'clock
4 Comments
Latest comment
Hi Lukas,
als nur nochmal das ich den Text richtig verstanden habe.
Du hast jetzt ein Logo auf der 1. Seite.
Und du willst jetzt das ab der 2. Seite die Kopfzeile anders ist und dass das Logo was du auch bei der 2. Seite verwendet hast, auch bei der 3. 4. etc. vorkommt? Soweit richtig oder was falsch?
Weil prinzipiell liefert Word diese Lösung selber. Ich weiß jetzt natürlich nicht welches du verwendest. bei meinem Office 2010 ist es so, wenn ich z.B. auf der 1. Seite in die Kopfzeile reingehe, dann geht Word ja automatisch in die Karteikarte "Kopf- und Fußzeilentools" "Entwurf"
Und dort gibt es eben auch die Möglichkeit den Haken zu setzen. "1. Seite anders"
Wenn du den setzt, kannst du die Kopfzeile auf der 1. Seite bearbeiten und du wirst sehen die auf der 2. Seite ist leer. Alles was du jetzt in der 2. Seite machst, gilt automatisch für alle folgenden.
Wichtig ist nur, dieser Haken muss unbedingt gesetzt sein, bevor du überhaupt eine 2. Seite in dem Dokument geöffnet hast.
Die Einstellungen gibt in den anderen Office Version auch. Weiß aber nicht genau ob die woanders liegen in der Anzeige.
Hoffe ich konnte helfen.
als nur nochmal das ich den Text richtig verstanden habe.
Du hast jetzt ein Logo auf der 1. Seite.
Und du willst jetzt das ab der 2. Seite die Kopfzeile anders ist und dass das Logo was du auch bei der 2. Seite verwendet hast, auch bei der 3. 4. etc. vorkommt? Soweit richtig oder was falsch?
Weil prinzipiell liefert Word diese Lösung selber. Ich weiß jetzt natürlich nicht welches du verwendest. bei meinem Office 2010 ist es so, wenn ich z.B. auf der 1. Seite in die Kopfzeile reingehe, dann geht Word ja automatisch in die Karteikarte "Kopf- und Fußzeilentools" "Entwurf"
Und dort gibt es eben auch die Möglichkeit den Haken zu setzen. "1. Seite anders"
Wenn du den setzt, kannst du die Kopfzeile auf der 1. Seite bearbeiten und du wirst sehen die auf der 2. Seite ist leer. Alles was du jetzt in der 2. Seite machst, gilt automatisch für alle folgenden.
Wichtig ist nur, dieser Haken muss unbedingt gesetzt sein, bevor du überhaupt eine 2. Seite in dem Dokument geöffnet hast.
Die Einstellungen gibt in den anderen Office Version auch. Weiß aber nicht genau ob die woanders liegen in der Anzeige.
Hoffe ich konnte helfen.
Das gibt es, aber dies gilt nur für den Text in der jeweiligen Kopfzeile. Shapes wie Bilder werden dabei leider nicht separat aufgelistet sondern es befinden sich immer alle Bilder von allen Kopfzeilen mit in der Auflistung.
wenn du versuchst mit diesem Code z.B. .Shapes(x) auf die jeweiligen Shapes zuzugreifen wirst du feststellen das in der Auflistung immer die Bilder von allen Kopfzeilen dieses Abschnitts vorhanden sind. Um diese auseinander zu halten würde ich Ihnen einen "AlternativeText" in den Eigenschaften verpassen.
Hoffe das hilft Dir weiter ...
Grüße Uwe
'Header der erste Seite Abschnitt 1
With ActiveDocument.Sections(1).Headers(wdHeaderFooterFirstPage)
.Range.Text = "Ich bin Text nur auf der ersten Seite"
End with
'Header der anderen Seiten Abschnitt 1
With ActiveDocument.Sections(1).Headers(wdHeaderFooterPrimary)
.Range.Text = "Ich bin Text ab der zweiten Seite"
End Withwenn du versuchst mit diesem Code z.B. .Shapes(x) auf die jeweiligen Shapes zuzugreifen wirst du feststellen das in der Auflistung immer die Bilder von allen Kopfzeilen dieses Abschnitts vorhanden sind. Um diese auseinander zu halten würde ich Ihnen einen "AlternativeText" in den Eigenschaften verpassen.
Hoffe das hilft Dir weiter ...
Grüße Uwe
Zitat von @colinardo:
'Header der anderen Seiten Abschnitt 1
With ActiveDocument.Sections(1).Headers(wdHeaderFooterPrimary)
.Range.Text = "Ich bin Text ab der zweiten Seite"
End With
'Header der anderen Seiten Abschnitt 1
With ActiveDocument.Sections(1).Headers(wdHeaderFooterPrimary)
.Range.Text = "Ich bin Text ab der zweiten Seite"
End With
Danke das hat mich schonmal weitergebracht. Allerdings habe ich das Problem, dass Seite 2 nicht immer existiert. Dann fällt man mit ActiveDocument.Sections(1).Headers(wdHeaderFooterPrimary) auf die Nase. Gibts ne Möglichkeit abzuprüfen, ob Seite 2 existiert bzw. Seite 2 zu editieren, ohne dass Sie verwendet wird?
Habs hinbekommen. Habe ein Schleife drum gebaut die die Seitenanzahl des Dokuments prüft und bei 1seitigen Dokumenten einen Seitenumbruch macht, den zu editierenden Teil bearbeitet und dann den Seitenumbruch wieder löscht.