Imparare come inserire i valori da Microsoft Word a un database di Microsoft Access può diventare utile quando si acquisisce dati da parte degli utenti attraverso la parola . Il modo migliore per inserire i dati da Word a Access è attraverso l'uso di "oggetti dati ( ADO ) " in Visual Basic, Applications Edition (VBA ) . VBA è un linguaggio di programmazione utilizzato in applicazioni di Microsoft Office per scrivere programmi . ADO consente di effettuare una connessione ad un database e inserire i valori per la tabella e le colonne di vostra scelta. Istruzioni
1

lancio di Microsoft Word , fare clic sulla scheda "Sviluppatore " , e fare clic su " Visual Basic " per avviare la finestra Editor VB . Fai clic sul menu "Inserisci" e fare clic su "Modulo" per inserire un nuovo modulo di codice
2

Digitare quanto segue per creare una nuova procedura secondaria : .

Private Sub insertValuesToDB ( )

3

Creare una variabile di tipo stringa per contenere i dati di Word che si desidera inserire :

Dim valueRead As String
4

Selezionare il riga di testo in Word e salvarlo nella variabile stringa :

Application.Selection.Expand wdLine

valueRead = Application.Selection.Text
5

Creare il ADODB variabili oggetto :

Dim adoConn come ADODB.Connection

Dim adoCmd Come ADODB.Command
6

definire il percorso e il nome del database di Access . Aprire la connessione :

adoConn = New ADODB.Connection

adoConn

ConnectionString = "Provider = Microsoft.ACE.OLEDB.12.0 ; " & _ < br . >

"Data Source = C : \\ Northwind 2007.accdb " .

aperto

End With
7

Creare un nuovo comando per inserire la linea selezionato in Word a una tabella di database di Access :

adoCmd = New ADODB.Command

adoCmd

ConnessioneAttiva = adoConn

CommandText = " . . INSERT INTO ) VALUES ( ' "& ( valueRead ) &" ') "

concluderà con
adoCmd.Execute

8

Modifica e digitare il nome della tabella e il nome del campo che si desidera utilizzare per inserire i dati

oggetti di uscita dalla memoria e chiudere la connessione : .

adoConn.Close

adoConn = Nothing
9

visualizzare un messaggio quando il valore è stato inserito nel database e terminare la procedura :

MsgBox "Valore è stato aggiunto alla tua tabella di database . "

End Sub
10

Premere " F5 " per eseguire la procedura .

• Come chiamare VBScript Da Vb.NET 
• Come compilare un'applicazione VB.Net