Word - Write To Active Document

This macro writes text to the active document.


  • 3161
  • 1489
  • 0
  • 0
Add to collection
© 2023VBAmacros.net

1 Open MS Word.

2 Create a blank document.

3 Go to Developer's tab > click on "Visual Basic" button or hit Alt + F11.

4 Go to Insert tab > click on "Module" or hit M.

5 Copy the VBA code from below.

6 Paste the code in the newly created module.

7 Go to Run tab > click on "Run Sub/UserForm" or hit F5.

8 That's it!

"Lorem Ipsum" text snippet kindly provided by Lipsum.


' Write To Active Document
Sub writeToActiveDocument()
    ' Set variables
    Dim strText As String
    ' Set text
    strText = "Lorem ipsum dolor sit amet, consectetur adipiscing elit." & _
              "Aliquam vitae tortor a risus molestie facilisis. Nullam elit augue, " & _
              "mattis molestie mollis at, tempor non mi. Aenean a nunc vitae nunc consequat faucibus. " & _
              "Fusce dui lorem, ultrices id rutrum quis, cursus non mi. Aliquam et ante fringilla, " & _
              "sodales justo nec, aliquet enim. Praesent et turpis quam. Fusce volutpat quis mauris a finibus."
    ' Write to document
    Selection.TypeText strText
End Sub

Sort by:
This site is protected by reCAPTCHA and the Google Privacy Policy and Terms of Service apply.
  • Created
  • Last updated
VBAmacros.net VBAmacros.net
Code was successfully copied!
VBAmacros.net VBAmacros.net
Please sign in!
VBAmacros.net VBAmacros.net
You've already voted!