[gelöst] Makro - Schriftart und Schriftgrösse ändern

[MavMan]

Hallo Community,

ich habe das Forum schon durchsucht, aber keinen adäquaten Beitrag gefunden. Könnt ihr mir helfen?
Es geht darum, dass ich in einem Tabellenblatt in einem Makro in den Zellen 0:0 (=A1) und 2:46 (=C47) die Schriftart "FreeSans" (oder besser Arial), die Schriftgrösse in 10 und Farbe dunkelblau geändert werden soll.

Ich hab schon etwas probiert....komme aber nicht auf die Lösung

Könnt ihr mir bitte helfen?
Vielen Dank.

Grüsse
MavMan

[Toxitom]

Hey MavMan,

findest Du beides in den Eigenschaften der Zelle. Besser wäre jedoch, eine Zellvorlage entsprechend zu definieren und zuzuweisen.

Code: Alles auswählen

   odoc = thisComponent
   
   oZelle = oDoc.sheets(0).getCellRangeByName("A1")
   with oZelle
     .CharFontName = "MeineWunschSchriftName"    'Schriftname / Fontname
     .CharHeight = 10                 'Schriftgröße
     .charColor = RGB(0,0,160)    'z.B. ein dunkelbleu
   end with

Ich empfehle Dir ein Inspektionstool zu nutzen wie XRAY oder MRI - dann kannst Du solche Informationen sehr leicht selbst extrahieren:)

VG
Tom

[MavMan]

Hallo Tom,

Du bist der Beste! Möchte mich nur noch einmal bedanken - Das ist sehr übersichtlicher, guter Code, der genau das macht was ich brauche
Und MRI kannte ich noch nicht. Habe es heruntergeladen und da bekommt man ja richtig viele gute Informationen...muss mich aber erst noch einlesen.

Du hast mir echt sehr geholfen.

Viele Grüsse
Timo