Excel Kopfzeile formatieren

[Sidi61]

Hallo zusammen,

es gelingt mir leider nicht einen Text mit Formatierung in Kopf- und Fußzeilen des Excelblattes einzufügen.

Einfach nur Text ist kein Problem:
ExcelApp.ActiveWorkbook.ActiveSheet.PageSetup.LeftHeader := 'Linke Kopfzeile, Text Standard'; Um heraus zu bekommen wie Excel den Text formatiert habe ich das mit dem Macro Recorder aufgezeichnet. Dabei ist folgendes rausgekommen:

.RightFooter = "&""Arial Black,Kursiv""&10&U&KFF0000rechte Fußzeile, Text ArialBlack, Size 10, kursiv, untersctrichen, rot"

Wenn ich das aber wie folgt übergebe...
ExcelApp.ActiveWorkbook.ActiveSheet.PageSetup.RightFooter := '"&""Arial Black,Kursiv""&10&U&KFF0000rechte Fußzeile, Text ArialBlack, Size 10, kursiv, untersctrichen, rot"'; ...wird der Text nicht formatiert.

Ich habe verschiedene Varianten ausprobiert, mal ' anstatt " oder ganz ohne ' und ", hat aber leider nichts davon funktioniert.

Nachtrag:
Bei folgendem Befehlt filtert Excel die Formatierungsinformationen raus und stellt nur den eigentlichen Text ein - die Formatierung wird jedoch nicht umgesetzt:
ExcelApp.ActiveWorkbook.ActiveSheet.PageSetup.RightFooter := '&"Arial Black"&"Kursiv"&"14"&"U"&"KFF0000"rechte Fußzeile, Text ArialBlack, Size 10, kursiv, untersctrichen, rot';
Weiß jemand wie ich den Formatierungscode übergeben muss damit dieser angewendet wird

Gruß
Sidi61