<div>
Ha, that did it. &nbsp;Didn't even consider an extension as I haven't changed this in 8 years. &nbsp;Have to find out who's been messing with my files.
</div>


Ha, that did it.  Didn't even consider an extension as I haven't changed this in 8 years.  Have to find out who's been messing with my files.

<div>
The 'object required' error is a bit confusing.
</div>


The 'object required' error is a bit confusing.

<div>
<div class="content wysiwyg-content">
When running the following Visual Basic file, which opens a Word document and runs a macro, I get an error 800A01A8 on Line 5 (see below), Object required: 'documents.Open(...)', even though this VBS file has worked for about 8 years now. &nbsp;Since the file name was not changed or moved, guessing that VBS has been updated, but can't find what the correct object command is. &nbsp;Any ideas?<br />
Line 5 seems to be (see also below): &nbsp; Set wdWb = wdApp.documents.Open(&quot;R:\f<wbr />mExports\M<wbr />astersandM<wbr />acros\UPCS<wbr />etupStarte<wbr />r&quot;)<br />
<br />
Dim wdApp, wdWb<br />
<br />
Set wdApp = CreateObject(&quot;Word.Applica<wbr />tion&quot;)<br />
wdApp.Visible = True<br />
Set wdWb = wdApp.documents.Open(&quot;R:\f<wbr />mExports\M<wbr />astersandM<wbr />acros\UPCS<wbr />etupStarte<wbr />r&quot;)<br />
<br />
wdApp.Run &quot;FormatUPCSales&quot;<br />
<br />
'if the macro takes arguments, use:<br />
'wdApp.Run &quot;FormatUPCSales&quot;, &quot;Arg1&quot;, &quot;Arg2&quot;, &quot;Arg3&quot;<br />
<br />
'wdWb.Close True<br />
Set wdWb = Nothing<br />
'wdApp.Quit<br />
Set wdApp = Nothing
</div>
</div>


When running the following Visual Basic file, which opens a Word document and runs a macro, I get an error 800A01A8 on Line 5 (see below), Object required: 'documents.Open(...)', even though this VBS file has worked for about 8 years now.  Since the file name was not changed or moved, guessing that VBS has been updated, but can't find what the correct object command is.  Any ideas?
Line 5 seems to be (see also below):   Set wdWb = wdApp.documents.Open("R:\fmExports\MastersandMacros\UPCSetupStarter")

Dim wdApp, wdWb

Set wdApp = CreateObject("Word.Application")
wdApp.Visible = True
Set wdWb = wdApp.documents.Open("R:\fmExports\MastersandMacros\UPCSetupStarter")

wdApp.Run "FormatUPCSales"

'if the macro takes arguments, use:
'wdApp.Run "FormatUPCSales", "Arg1", "Arg2", "Arg3"

'wdWb.Close True
Set wdWb = Nothing
'wdApp.Quit
Set wdApp = Nothing

What is the correct VBS open.document object command?  Seems to have changed.

Microsoft Word is a commercial document editing program that is part of the Microsoft Office suite. It features numerous text-editing tools for creating richly formatted documents, along with tools for the use of macros in Word documents. Word's native file formats are denoted either by a .doc or .docx file extension. Plugins permitting the Windows versions of Word to read and write formats it does not natively support, such as the OpenDocument format (ODF) are available. Word can import and display images in common bitmap formats such as JPG and GIF. It can also be used to create and display simple line-art.