Wenn dir ein schöner Mann begegnet, dessen Augen glänzen, dessen Lippen feucht sind, dessen heißer Körper bebt – lass die Finger von ihm – er hat Grippe!
Okay, ich habe den Kunden falsch verstanden. Nur das Logo soll per VBA in die Kopfzeile eingefügt werden.
Der Befehl – füge Bild in die Kopfzeile ist schnell gefunden. Jedoch das PrintCommunication bringt mich um!
Nach einigen Versuchen klappt es.
Beispielsweise so:
Application.PrintCommunication = False
With Datei.Worksheets(j).PageSetup
.RightHeader = ""
End With
Application.PrintCommunication = True
With Datei.Worksheets(j).PageSetup
.RightHeader = "&4" & Chr(10) & "&10&G"
.RightHeaderPicture.Filename = Bildpfad
.RightHeader = "&4" & Chr(10) & "&10&G"
End With
Application.PrintCommunication = True
