Antworten:
Hier ist ein VBA-Makro:
Sub InsertText()
ActiveInspector.WordEditor.Application.Selection.TypeText "My text"
End Sub
Sie können dieses Makro dann mit der Schaltfläche auf einem Menüband ausführen.
Es gibt auch fortgeschrittenere kommerzielle Lösungen auf dem Markt. Ich kann ReliefJet Quick Text weiterempfehlen, weil ich einer der Entwickler bin. Dieses Tool kann den formatierten Text entweder über eine Schaltfläche oder über einen Hotkey einfügen.
Ich weiß, dass Sie nach einem Makro gefragt haben. Wenn Sie jedoch nur einen Text einfügen möchten, benötigen Sie keine Makros, sondern können Quick Parts verwenden. Hier ist eine kurze Anleitung: http://www.slipstick.com/how-to-outlook/insert-text-quick-parts/ .