Embed Image in xlam and insert in header / footer using macro / VBA

I have a problem, very similar to this one and that answer really doesn't help me..

To be specific, I'm trying to create a macro in an xlam file. The macro should insert images stored in the xlam file into the active excel file in the header and footer.

This little piece of code works as long as it's referencing a full path filename, but if I copy the xlam file to a different computer, the image files cannot be found (since obviously the files are not located there).

So how do I reference the images stored in the xlam file in a macro like this one?
I need to exchange the Filenames with something relative or something embedded in the xlam.

Sub LogoAdd(ByVal control As IRibbonControl)

    Sheets(1).Activate
    With ActiveSheet.PageSetup
        .DifferentFirstPageHeaderFooter = True
        .ScaleWithDocHeaderFooter = True
        .AlignMarginsHeaderFooter = True
        .FirstPage.RightHeader.Text = "&G"
        .FirstPage.RightFooter.Text = "&G"
    End With
    ActiveSheet.PageSetup.FirstPage.RightHeader.Picture.Filename = _
        "C:\***filenameandpathremoved***.jpg"
    ActiveSheet.PageSetup.FirstPage.RightFooter.Picture.Filename = _
        "C:\***filenameandpathremoved***.png"
End Sub

wow .. although that sounds really complex, it also sounds like it would really work

But I'm a bit new to excel macros (even though I'm really not new to programming).
Could you possibly point me in the direction of some examples on doing these steps?

I have no idea how to
*store images in ActiveX image controls
*use the SavePicture function
*overcome file security access to save the images to disk / delete them again (I've heard plenty of stories about excel security to know this can be an issue, but a working example could prove me wrong )

Well this is my first time working with ActiveX objects in excel..

It looks like this ActiveX object has quite limited capabilities compared to a normal image. Transparency for instance is nowhere to be found..

Is there really no way to use a normal image inserted somewhere in a sheet before saving as a xlam file?

Soo .. there's simply no way to assign an embedded image directly to a blank excel file without creating the image as a file first?

bugger ... Thanks for making that clarification.

I wonder if there's some way to work around this limitation then ..

I think I'll open up a new ticket for a workaround since it's a completely different topic than adding a picture to the header / footer.

Ok workaround 2 is still inside this scope of adding a picture to the header / footer.

How about adding a filepicker, and simply have the image files picked seperately and saved in the macro. I know that's throwing quite a bit of the automatic stuff out the window, but I can't really see a better way right now, since I really need transparency in one of the images.

My mind is completely bugged about this problem, so any help would be really appreciated.

ah .. let me correct that. The initial code shows only the example of adding the logo files to the front page. It's actually the watermark code which is causing a headacke.

Although it's very similar, it's still a bit different.

Here it is:

Sub WatermarkAdd(ByVal control As IRibbonControl)
    Dim WS_Count As Integer
    Dim I As Integer

    WS_Count = ActiveWorkbook.Worksheets.Count

    For I = 1 To WS_Count
        ActiveWorkbook.Worksheets(I).PageSetup.CenterHeaderPicture.Filename = _
        "C:\***pathandfilenameremoved***.PNG"
        ActiveWorkbook.Worksheets(I).PageSetup.FirstPage.CenterHeader.Picture.Filename = _
        "C:\***pathandfilenameremoved***.PNG"
        ActiveWorkbook.Worksheets(I).PageSetup.CenterHeader = "&G"
        ActiveWorkbook.Worksheets(I).PageSetup.FirstPage.CenterHeader.Text = "&G"
    Next I
End Sub

Which part of the header or footer is used is actually irellevant, as long as it's not already used by something else. I find the CenterHeader is rarely used, and thus a perfect target for a watermark.

Yes I read it through, twice, and as far as I can tell, it's using only bitmaps, which again has a limitation on transparency. Please let me know if I'm wrong about that.

I need to add a transparent image on all printed pages by the click of a customUI button. I know I'm close, since I've made the button and the xlam file (as shown in my initial code), but I'm still searching for a workaround to the absolute path in the macro referencing the images.