Hey,
I achieved to generate a WordArt Object with the following code:
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