Apri documento Word
Questa macro Word VBA aprirà un documento Word dalla directory specificata:
Sub OpenDoc() Dim strFile As String strFile = "c:\Users\Nenad\Desktop\Test PM.docm" 'cambia nel percorso del tuo file If Dir(strFile) "" Then 'Prima controlliamo se il documento esiste in data posizione Documents.Open strFile End If End Sub
Ora puoi interagire con il documento appena aperto con l'oggetto ActiveDocument. Questo codice aggiungerà del testo al documento.
ActiveDocument.Range(0, 0).Text = "Aggiungi del testo"
Apri documento in variabile
Puoi anche aprire un documento Word, assegnandolo immediatamente a una variabile:
Sub OpenDoc() Dim strFile As String Dim oDoc as Document strFile = "c:\Users\Nenad\Desktop\Test PM.docm" 'cambia nel percorso del tuo file If Dir(strFile) "" Then 'Prima controlliamo se document esiste in una determinata posizione Set oDoc = Documents.Open strFile End If End Sub
Permettendoti di interagire con il documento tramite la variabile oDoc.:
oDoc.Range(0, 0).Text = "Aggiungi del testo"
Generalmente è buona norma aprire a una variabile, dandoti la possibilità di fare facilmente riferimento al documento in qualsiasi momento.
Apri documento Word da Excel
Questa procedura VBA aprirà un documento Word da un altro programma MS Office (es. Excel):
Sub OpenDocFromExcel() Dim wordapp Dim strFile As String strFile = "c:\Users\Nenad\Desktop\Test PM.docm" Set wordapp = CreateObject("word.Application") wordapp.Documents.Open strFile wordapp.Visible = True End Sub
