WordArt in Header, Excel

[konfiskation]

Hey,

I achieved to generate a WordArt Object with the following code:

               
     dim DateArt As Shape 
       
       x = "Created" & vbLf & Format(Date, "DD.MM.YYYY") 
       Set DateArt = wss.Shapes.AddTextEffect(PresetTextEffect:=msoTextEffect14, text:=x, _ 
            FontName:="Arial Black", FontSize:=18, FontBold:=msoFalse, FontItalic:=msoFalse, _ 
            Left:=500, Top:=-40) 
      DateArt.Rotation = 30

In Excel I would like to put that WordArt Object into the header and not to have it as a objet on a worksheet ('wss').

Is is actually possible in Excel? I could not find anything on the internet.

Thank you very much

Groetjes
Moritz

BTW: If you also know how make the text transparent I would really appreciate some comments about it

[konfiskation]

Nobody knows, or is it not possible?

Regards,
Konfiskation