Word - Write To Active Document

This macro writes text to the active document.


  • 3764
  • 1731
  • 0
  • 0
Add to collection
© 2024VBAmacros.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.
VBAmacros.net VBAmacros.net
Code was successfully copied!
VBAmacros.net VBAmacros.net
Please sign in!
VBAmacros.net VBAmacros.net
You've already voted!