Email formatieren
11.02.2020 14:35:01
Sven
ich generiere über ein Makro eine Email, in der ich im Text bestimmte Bereiche fett hervorhebe und unterstreiche nun stellt sich noch die Frage wie ich ein bestimmten Bereich gelb hinterlegen kann.
Anbei ein Ausschnitt aus meinem Makro zur Formatierung des Textes:
Rem Word-Editor-Objekt erstellen (zum Formatieren erforderlich)
Set wdApp = .GetInspector
Set wdDoc = wdApp.WordEditor
Set wdRange = wdDoc.Range
wdRange.WholeStory
Rem Emailtext formatieren
With wdRange
Rem Schriftart und Schriftgröße festlegen
.Font.NAME = "Arial"
.Font.Size = 10
End With
Rem Untersreichen und Fett
Set wdRange = wdDoc.Range(130, 377 + lngZelle)
With wdRange
.Font.Underline = True
.Font.Bold = True
End With