insert text into word document with vba code example

Example: vba add text to word document

Sub InsertTextAtEndOfDocument() 
 ActiveDocument.Content.InsertAfter Text:=" The end." 
End Sub