Variablen Text in Fußzeile von Excel übernehmen

Computer: Software & Programmierung Office Software
1

Hallo miteinander,
habe folgendes Problem: möchte in Excel (97) in Abhängigkeit von Optionsfeldern einen variablen Text in die Fußzeile schreiben. Dies klappt auch gut, aber wie kann ich diesen Text auch formatieren (er soll fett, in der Schriftart Times New Roman und 14 pt groß sein).
Kann mir bitte jemand sagen, wie ich im Makro dem variablen Text (z.B. als String-Variable „text“) die Formatierung zuweisen kann? Danke Euch vielmals.

Gruß,
Bernhard

2

Hallo! Kopier Dir mal folgenden Code in ein Makro und führ es aus! Schau Dir danach den Header der aktuellen Tabelle an. Dann wirst Du sehen, wie´s funktioniert!

ActiveSheet.PageSetup.LeftHeader = "NORMAL" & Chr(10) \_
& "&""Arial,Fett""FETT" & Chr(10) \_
& "&""Arial,Kursiv""KURSIV" & Chr(10) \_
& "&UUnterstrichen&U" & Chr(10) \_
& "&16Größe16" & Chr(10) \_
& "&""Courier New""COURIER-NEW"

Der String sieht dann so aus:

&"Arial,Fett"FETT
&"Arial,Kursiv"KURSIV
&UUnterstrichen&U
&16Größe16
&"Courier New"COURIER-NEW

Und das Ergebnis ist entsprechend formatiert!

Tip: Zeichne einfach mal ein Makro selber auf und sieh Dir das Ergebnis an, dann erklärt sich vieles von selbst :wink:

Gruß
(Woly)