VBA/Excel 2013: Grafikdatei in Kopfzeile einfügen

[Cannonball]

n'Abend allerseits,

ich habe ein Excel-Makro, das für neue Arbeitsblätter ein paar Grundeinstellungen vornimmt. Jetzt habe ich das erweitert, es soll in den linke Bereich der Kopfzeile eine Grafikdatei von der Festplatte einfügen.

Dazu habe ich ein Makro aufgezeichnet, und dann den nach meiner Meinung relevanten Teil in mein Makro eingebaut, das jetzt so aussieht:

Sub Blatteinstellungen()
'
' Blatteinstellungen Makro
' Setzt Währungsformat und Zeilenhöhe 15 für das ganze Arbeitsblatt
'
' Tastenkombination: Strg+Umschalt+s
'
     ActiveSheet.Cells.NumberFormat = "#,##0.00 $"
     ActiveSheet.Cells.RowHeight = 15
     ActiveSheet.Cells.ColumnWidth = 12
     ActiveWindow.View = xlPageLayoutView
     ActiveSheet.PageSetup.LeftHeaderPicture.Filename = _
        "C:\Users\DE-13953\Downloads\PwC_fl_30mmh_c.jpg"
     Range("A1").Select
End Sub

Problem: der Teil mit dem Bild einfügen funktioniert nicht, ich bekomme aber (leider) auch keine Fehlermeldung. Jemand eine Idee, was da falsch läuft?

Gruß,
Cannonball

 

[Cannonball]

So, ich habe jetzt rausgefunden, warum das nicht funktioniert hat. Da es ja doch einige Hits gab, schreib ich das mal kurz hier rein:

Bevor Excel in der "Page Layout-Ansicht eine oder mehrere Einstellungen (Commands) entgegennehmen kann, muss man die Druckerkommunikation abschalten:

ActiveWindow.View = xlPageLayoutView
Application.PrintCommunication = False