Gruppe
Druck
Bereich
Kopf/Fußzeile
Thema
Alle Kopf-/Fußzeilen-Festlegungen löschen
Problem
Wie kann ich über VBA alle Einstellungen für Kopf und Fußzeilen in der gesamten Arbeitsmappe löschen?
Lösung
Geben Sie den nachfolgenden Code in ein Standardmodul ein und weisen Sie ihn einer Schaltfläche zu.
StandardModule: basMain
Sub KopfFussWeg()
Dim wks As Worksheet
For Each wks In ThisWorkbook.Worksheets
With wks.PageSetup
.LeftHeader = ""
.CenterHeader = ""
.RightHeader = ""
.LeftFooter = ""
.CenterFooter = ""
.RightFooter = ""
End With
Next wks
End Sub