Hi,
I want to take a .jpg picture from my computer and insert it in the left and another one in the richt corner of the header. In my opinion this program should work but it won't and I don't know why.
Here is my code I have until now:
Thank you for your help
I want to take a .jpg picture from my computer and insert it in the left and another one in the richt corner of the header. In my opinion this program should work but it won't and I don't know why.
Here is my code I have until now:
Code:
With ActiveSheet.PageSetup.LeftHeaderPicture
.Filename = "D:\Eigene Dateien\Customer Logo.jpg"
End With
With ActiveSheet.PageSetup.RightHeaderPicture
.Filename = "D:\Eigene Dateien\picutre2.jpg"
End With
'Insert of the Header and Footer including pictures
With ws.PageSetup
.LeftHeader = "&G"
.CenterHeader = "Electrical Load Analysis"
.RightHeader = "&G"
.CenterFooter = "&A"
.RightFooter = Format(Date, "dd.mm.yyyy")
End With
Thank you for your help