Aprire Excel , quindi digitare un elenco di nomi in una colonna e le età in una colonna adiacente . Etichettare le cime di queste colonne con il testo "Nomi " e " Ages ". Questo passaggio consente di creare un database di dati di esempio per il programma SQL per recuperare . È possibile creare una tabella con dati diversi , se vuoi . 
 
 2 Trascinare una regione di selezione intorno al tavolo , quindi digitare " MyTable " nella casella di testo a sinistra della barra della formula . Questo crea un nome di intervallo per i dati di esempio , che il programma avrà bisogno di accedere ai dati 
 3 
 Salvare il file come . "C : \\ MyDatabase.xlsx ", quindi chiudere il file . 
 4 
 Press "Control ", seguito da "N" per creare un nuovo foglio di calcolo . Potrai memorizzare il programma SQL in questa scheda . 
 5 
 Press " Alt ", seguito da " F11 " per entrare nell'ambiente di sviluppo VB , comunemente abbreviato come " IDE ". Gli sviluppatori scrivono e talvolta eseguire programmi VB in questo IDE . 
 6 
 Fare clic sul menu "Inserisci" , quindi fare clic sulla voce "Modulo" . Questa azione crea una nuova finestra di codice per voi di inserire il listato del programma SQL . 
 7 
 Clicca la voce di menu " Strumenti " , quindi su "Riferimenti ". Mettere un segno di spunta nella casella di controllo " Microsoft ActiveX Data Objects . " Questa azione rende visibili gli oggetti del database che Excel ha bisogno per eseguire la query SQL . 
 8 
 Incollare il seguente programma nella nuova finestra del codice . 
 
Sub sqlVBAExample ( ) per
 Dim objConnection come ADODB.Connection 
 
 Dim objRecSet come ADODB.Recordset 
 
 objConnection = New ADODB.Connection 
 
 objConnection.ConnectionString = "Provider = Microsoft.ACE . OLEDB.12.0 ; Data Source = c : \\ myDatabase.xlsx ; Extended Properties = " " di Excel 12.0 Xml ; HDR = YES " " ; " 
 
 objConnection.Open 
 
 objRecSet = New ADODB . Recordset 
 
 objRecSet.ActiveConnection = objConnection 
 
 objRecSet.Source = "Select * from Tabella " 
 
 objRecSet.Open 
 
 Range (" D10 " ) . CopyFromRecordset objRecSet 
 
 objRecSet.Close 
 
 objConnection.Close 
 
 objRecSet = Nothing Set 
 
 objConnection = Nothing 
 
 End Sub 
 Pagina 9 
 Clicca una delle dichiarazioni del programma , quindi premere il tasto " F5 " per eseguire il programma . 
 10 
 Premi "Alt " e poi " F11 " per tornare alla foglio di calcolo Excel . Il foglio elettronico visualizzerà i risultati della connessione SQL che il programma stabilito. I risultati includono la tabella di database creato in precedenza . 
 
              
software © www.354353.com