Se hai iniziato utilizzando Visual Basic for Applications (VBA) per Excel, hai già visto come VBA può trasformare un buon foglio di calcolo in una grande. Le macro registrate in grado di automatizzare attività, ma il vero potere di VBA è in Visual Basic Editor, dove è possibile scrivere procedure che estendono le funzionalità di Excel. È anche possibile utilizzare VBA per raggiungere all'esterno di Excel, in un'altra applicazione di Office come Word. Poiché entrambe le applicazioni utilizzano il linguaggio di programmazione VBA, è possibile scrivere codice in Excel per avviare Word e immettere il testo in un documento. Eseguire il codice di esempio e quindi utilizzare le vostre abilità VBA per modificare il codice fino a quando non adatta alle tue esigenze.

Istruzioni

1

Avviare Word e aprire un nuovo documento. Salvare il documento con un nuovo nome, ad esempio "C:\TestDoc.doc." Prendere nota del nome che scelto, come si verrà utilizzato nel codice VBA. Chiudere il documento e uscire da Word.

2

Aprire Excel.

3

Avviare l'Editor di Visual Basic. Pulsante destro del mouse sulla scheda "Sheet1" sulla parte inferiore dello schermo. Selezionare "Visualizza codice".

4

Aggiungere la libreria di oggetti che contengono oggetti, proprietà e metodi per parola. Selezionare "Strumenti" seguite da "Riferimenti" dal menu. Scorrere l'elenco fino a trovare "XX. x Microsoft Word Object Library" (XX. x sta per la versione; per esempio, se si utilizza Office 2007, cercare la libreria oggetti di Microsoft Word 12.0). Selezionare la casella di controllo e quindi fare clic su "OK".

5

Inserire un modulo per contenere il codice selezionando "Inserire" seguita da "Modulo" dal menu.

6

Iniziare una routine Sub. Nel nuovo modulo, digitare quanto segue:

Sub Word_Text()

Premere "Enter". Excel genera automaticamente un'istruzione "End Sub".

7

Dichiarare le variabili. Digitare il seguente codice tra le istruzioni "Sub" e "End Sub":

Dim wdApp As Object, wdDoc As Object

Dim wordfile As String, enterstring As String

8

Impostare il valore della variabile "wordfile," specificando il documento di test creato in Word. Se successivamente si desidera utilizzare un altro documento di Word, modificare il nome del file in questa riga di codice. Digitare quanto segue:

Wordfile = "c:\testdoc.doc"

9

Impostare il valore della variabile "enterstring" per il testo che si desidera aggiungere nella parte superiore del documento Word. Digitare quanto segue:

enterstring = "Aggiungi questo testo al file."

10

Aggiungere una routine di gestione degli errori per verificare se Word è già in esecuzione. In caso contrario, aprire una nuova istanza di Word. Digitare quanto segue:

On Error Resume Next

Impostare wdApp = GetObject (, "Word. Application")

Se wdApp Is Nothing Then

Set wdApp = CreateObject

End If

On Error GoTo 0

11

Aggiungere il codice per aprire il documento di Word. Digitare quanto segue:

Set wdDoc = GetObject(wordfile)

12

Aggiungere codice per rendere visibile l'applicazione Word e quindi spostare il punto di inserimento all'inizio del documento. Digitare quanto segue:

Con wdApp

. Visibile = True

. Selection.HomeKey Unit: = wdStory, Extend: = wdMove

Terminare con

13

Aggiungere il codice per scrivere il testo di esempio in "enterstring" nel documento di parola seguito da un ritorno a capo. Digitare quanto segue:

Con wdDoc.Content

. InsertAfter enterstring

. InsertParagraphAfter

Terminare con

14

Aggiungere codice per svuotare le variabili oggetto per rilasciare la memoria utilizzata dall'applicazione. Digitare quanto segue:

Set wdDoc = Nothing

Impostare wdApp = Nothing

Lasciare l'istruzione "End Sub".

15

Eseguire il codice. Selezionare "Esegui" seguita da "Esegui Sub/UserForm" dal menu.

16

Mostra il documento di Word di esempio creato nel passaggio 1. Nella parte superiore del documento, si dovrebbe vedere una linea di lettura, "Aggiungere questo testo al file."

Consigli & Avvertenze

• Se ottenete un messaggio di errore, cercare gli errori di immissione di testo in codice, ad esempio virgolette supplementare o omessi, spazi e punti.
• Lettura di un messaggio di errore "nome di File o nome di classe non trovato durante l'uso dell'automazione" significa c'era un problema trovare il test di documento di Word. Controllare il valore assegnato a "wordfile", compreso il nome file e percorso.
• Se non vedete il testo di esempio il documento di Word o si verifica un altro errore, provare a passo dopo passo il codice. Posizionare il cursore all'inizio del modulo. Premere "F8" ripetutamente per eseguire una riga di codice alla volta, osservando i risultati.