VBA Excel close Word. Word Clipboard Question

[ehel]

Hi.

I use this code in Excel vba:

Dim wdApp As Word.Application


wdApp.Documents.Open "E:\Download\planeringsmote.doc"
wdApp.Documents(1).InlineShapes(2).Range.Copy
    wdApp.Documents.Close

    wdApp.Quit

The problem is that Word don't close because Word popup a messagesbox that ask if you want to save the stuff in the clipboard. This popup will not be seen by the user until the user click the Word icon in the taskbar.

Is there a way to force Word to close and skip all warnings and popups?

 

[Marc L]

Hi,​

​

see on Word side what are the options of the property DisplayAlerts in its VBA help …​

 

[NdNoviceHlp]

Maybe...

WdApp.DisplayAlerts = False

Maybe this might be useful too...

WdApp.ActiveDocument.Close savechanges:=False

HTH. Dave

 

[ehel]

Maybe...

WdApp.DisplayAlerts = False

Maybe this might be useful too...

WdApp.ActiveDocument.Close savechanges:=False

HTH. Dave

Thanks. The final solution was to clear the clipboard too.

Dim oData   As New DataObject 'object to use the clipboard
    oData.SetText Text:=Empty 'Clear
    oData.PutInClipboard 'take in the clipboard to empty it
    
    wdApp.ActiveDocument.Close savechanges:=False
    
    
    wdApp.Quit

 

[NdNoviceHlp]

You are welcome. Thanks for posting your outcome. Dave