In questo articolo, creeremo una macro per aprire il documento di Word.
Per aprire un documento di Word, specificheremo il percorso completo del documento nella casella di testo sul foglio principale. Dopo aver specificato il percorso completo, fare clic sul pulsante "Invia" per eseguire la macro.
Spiegazione del codice
Dim WDApp As Word.Application
Il codice sopra viene utilizzato per dichiarare l'oggetto dell'applicazione di parole.
Imposta WDApp = CreateObject("parola.Applicazione")
Il codice sopra viene utilizzato per creare un nuovo oggetto dell'applicazione di parole. L'applicazione Word verrà avviata, ma per impostazione predefinita non sarà visibile.
WDApp.Visible = True
Il codice sopra viene utilizzato per rendere visibile la finestra dell'applicazione Word.
Imposta WDDoc = WDApp.Documents.Open(FileName)
Il codice sopra viene utilizzato per aprire il documento di Word.
Imposta WDDoc = Niente
Imposta WDApp = Niente
Il codice sopra viene utilizzato per rilasciare la memoria occupata dall'oggetto.
Si prega di seguire sotto per il codice
Sub OpeningWordFile() 'Dichiarare le variabili Dim FileName As String Dim WDApp As Word.Application Dim WDDoc As Word.Document 'Ottenere il nome del file dalla casella di testo FileName = Sheets("Main").TextBox1.Value 'Creare l'oggetto della parola application Set WDApp = CreateObject("word.Application") 'Rende visibile la parola application WDApp.Visible = True 'Apre il documento word richiesto Set WDDoc = WDApp.Documents.Open(FileName) 'Rilascia la memoria utilizzata dalla variabile oggetto Set WDDoc = Niente Imposta WDApp = Niente End Sub
Se ti è piaciuto questo blog, condividilo con i tuoi amici su Facebook. Inoltre, puoi seguirci su Twitter e Facebook.
Ci piacerebbe avere tue notizie, facci sapere come possiamo migliorare il nostro lavoro e renderlo migliore per te. Scrivici al sito di posta elettronica