C'è più di un modo per ottenere i dati da Word in Access, ma l'invio di dati tra queste due applicazioni comporta un concetto che la documentazione di Microsoft si riferisce a " automazione ". Questa parola si riferisce ad una applicazione controlla un'altra , soprattutto attraverso gli oggetti virtuali che l' applicazione controllata espone ad altre applicazioni . Linguaggio di programmazione di Word , Visual Basic, Applications Edition , è lo strumento di programmatori usano per inviare i dati da Word ad Access. La possibilità di eseguire tale automazione rivela che una qualsiasi delle applicazioni di Office possono sfruttare i comandi degli altri. Istruzioni
1
Aprire Microsoft Access e fare clic sul pulsante "Tabella " nella scheda "Crea " . Questa azione comincia a creare una tabella a cui si inviano i dati del modulo di Word .
2
tipo " Campo1 " nella cella accanto al campo "ID" . Questa azione crea una nuova colonna , " Campo1 " nella nuova tabella .
3
Fare clic sul pulsante Office e quindi fare clic su "Salva con nome ". Digitare "C : \\ myDb.accdb " per il nome del file . Quando verrà richiesto di immettere il nome della tabella , digitare " Tabella1 ". Questo completa l'istituzione del tavolo a cui Word invierà i suoi dati del modulo.
4
Chiudi Access e quindi aprire Word .
5 Fare clic sulla scheda "Sviluppatore " e poi fare clic sul pulsante " Strumenti precedenti " nel pannello "Controlli" .
6
Fare clic su " casella di testo " Controllo e trascinare nella finestra del documento per definire una casella di testo per l'input dell'utente .
Pagina 7
Ripetere il passaggio 5 e quindi fare clic sul comando "Pulsante" . Trascinare il mouse sotto la casella di testo per creare un pulsante con il quale l'utente può inviare i suoi dati della casella di testo .
8
Fare clic con il pulsante e quindi fare clic su " Visualizza codice " per accedere alla funzione di Visual Basic Parola che verrà eseguito quando l' utente fa clic sul pulsante .
9
digitare la seguente istruzione nella posizione corrente del cursore . Questa affermazione richiama un'altra routine che invierà il valore della casella di testo in Access per l'archiviazione .
SendToAccess Testo box1
10
Fare clic sulla voce "Riferimenti" del menu "Strumenti" e poi fare clic sulla casella di controllo " Microsoft Data Access Objects " . Questo dice a Visual Basic che il programma ha bisogno di avere accesso a oggetti virtuali di Microsoft Access.
11
Incollare il seguente programma sotto la dicitura " End Sub " . Questo programma viene eseguito di accesso invisibile e dice di inserire i dati della casella di testo nella tabella di Access creato in precedenza .
Public Sub sendToAccess ( str1 ) per
Dim str2
dim appAccess Come Access.Application
appAccess = CreateObject ( " Access.Application " ) per
appAccess.OpenCurrentDatabase ( "c: \\ myDb.accdb " ) per
str2 = " inserire nella Tabella 1 ( campo1) valori ( ' " & str1 & " ') "
appAccess.CurrentDb.Execute str2
appAccess.CurrentDb.Close
appAccess.Quit icon