Copia e incolla il seguente codice nella finestra dell'editor di VBA :
Sub OpenWordDoc ( ) per
Dim wrdApp Come Word.Application
Dim wrdDoc Come Word.Document
wrdApp = CreateObject ( " Word.Application " ) per
wrdApp.Visible = True
wrdDoc wrdApp.Documents.Open = ( "C : \\ nome cartella \\ Filename.doc " ) per
wrdApp.Quit ' chiudere l'applicazione
Set Word wrdDoc = Nothing Set
wrdApp = Nothing
End Sub
2
Modificare il codice di cui sopra sostituendo "C : \\ nome cartella \\ Filename.doc ." con il percorso corretto e il nome del file del documento di Word che si desidera aprire
3
Premere " F5 " per eseguire il nome macro , e vedere il documento di Word aperto .
software © www.354353.com