header and footer per vba - grosse probleme
10.06.2025 22:39:43
zdenek fajfrlik
ich würde mich nicht an sie wenden, wenn ich jetzt nach stunden an versuchen nicht verzweilfeln würde.
die absolut einfach zuweisung (s.u.) führt zu totalen fehlern in den kopf- und fusszeilen . es wird nicht der richtige text zugewiesen, der alte wird nicht ersetzt, auch in absolut leere kopfzeile wird ober z.b. der dateiname gesetzt - völlig unerklärlich.
gibt es damit irgendwelche erfahrungen - speziell mit solchen fehlern ?
oder wo kann mein fehler liegen..
danke euch sehr !!!!!
gruss stan
For Each Sheet In Workbooks(firma_lv_file).Sheets
Sheet.Select
Sheet.Activate
Application.PrintCommunication = False
With ActiveSheet
.PageSetup.LeftHeader = "aaaa&& bbbbGmbH / cccccc-Architekten "
.PageSetup.CenterHeader = "AUFTRAGS-LV - " & Sheet.Name
.PageSetup.RightHeader = "Fa. Firma GmbH"
.PageSetup.LeftFooter = " "
.PageSetup.CenterFooter = ""
.PageSetup.RightFooter = firma_lv_file
End With
Application.PrintCommunication = True
Next
Anzeige