Error message appears ("Run-time error '4198'...) when clicking Cancel in Save As window

You can ask first, so that it will be less likely that they cancel, and handle the error when it occurs

Please Login or Register  to view this content.

Thanks for taking the time to respond. Using the On Error command has given me some ideas. When I ask the user if they want to save using the msgbox you suggested and they choose yes, it displays the Save As window. But if they happen to choose Cancel, when oWord.Application.Quit is executed, another message box appears asking the user: "Do you want to save changes you made to Document2?" I believe this occurs because the Saved property of the objdoc is False.

I altered the logic a bit and it seems to work for the moment:

' If an error is generated when the user closes the document, ignore it and resume.
On Error Resume Next
objDoc.Close True
' If objDoc is empty, this implies the Close method above successfully closed the document and objDoc.Saved will have been set to True. However, if the Close had failed (user clicked Cancel), objDoc will not be empty as the document is still open and objDoc.Saved will be equal to False. In this case, set Saved to True so that the Application.Quit method doesn't prompt the user again to save when it attempts to close.
If Not IsEmpty(objDoc) Then
objDoc.Saved = True
End If

objWord.Application.Quit
Set objWord = Nothing


Hope this makes sense.
Thanks again for your help!