Aussiebear: Thanks for your answer. Hope this gives extra info.

On launch, user gets a dialog.
Here he can choose from invoice for customer 1, 2, etc.
There are car texts in the template.
I can put text in mail if I can attach the value of the autotext value to a variable

Public Sub AddTekst(Tekst As String)
Dim Inspector As Outlook.Inspector
Dim wdDoc As Word.Document
Dim Selection As Word.Selection
       
    Set Inspector = Application.ActiveInspector()
    Set wdDoc = Inspector.WordEditor
    Set Selection = wdDoc.Application.Selection
        Selection.InsertAfter Tekst
    Set Inspector = Nothing
    Set wdDoc = Nothing
    Set Selection = Nothing
End Sub