voettekst middels VBA opnemen en juiste tekstkleur meegeven

Jolte · 11 mrt 2023

Ik heb onderstaande macro gemaakt en deze zet netjes de gewenste voettekst in het exceldocument.

Code:

Sub Voettekst()

Set Voettekst = Range("Voettekst")
ActiveSheet.PageSetup.LeftFooter = Voettekst

End Sub

De voettekst wordt nu met een zwarte kleur uitgevoerd, maar ik wil deze kleur aanpassen in R0 G137 B150. Hoe doe ik dat in de macro?

emields · 11 mrt 2023

een voorbeeldbestandje kan soms wonderen doen

Senso · 11 mrt 2023

Code:

.CenterHeader = "&C&50&""Arial""&K00007DText to be formatted"

(RGB-waarden geconverteerd naar hexadecimal)

Jolte · 11 mrt 2023

Ik heb het op onderstaande wijze op kunnen lossen. Bedankt voor de input!

Code:

Sub Voettekst()

Set Voettekst = Range("Voettekst")
ActiveSheet.PageSetup.LeftFooter = "&K008996" &Voettekst

End Sub

Wij waarderen jouw privacy