Question

1 CREATE A DOCUMENT (USE CHAPTER 20 FOR REFERENCE)

1. Using the Visual Basic Editor, create a VBA procedure named doc_create that does the following:

a. Creates a new Word document.

b. Adds 1 line of text that says “This is my document!”

c. Saves the file as myFile.docx

d. Closes the document.

Answer 1

Executable code
'VBA procedure
Sub doc_create()

'Declare the needed variables
Dim wordObject
Dim docObject
Dim selectionObject

'Create a word application
Set wordObject = CreateObject("Word.Application")

'Add document
Set docObject = wordObject.Documents.Add

'Set visibility
wordObject.Visible = True

'Word selection
Set selectionObject = wordObject.Selection

'Write this in word selection
selectionObject.TypeText ("This is my document")

'Save the document
docObject.SaveAs ("D:\myFile.docx")

'Close the document
docObject.Close
'End of VBA procedure
End Sub