lancio di Microsoft Access , fare clic su " Database vuoto " e fare clic sul pulsante "Crea " per creare un nuovo banca dati . Fare clic su "Strumenti database" e fare clic su " Visual Basic " per avviare l'editor di VBA . Fai clic sul menu "Inserisci" e fare clic su "Modulo" per inserire un nuovo modulo di codice 
 2 
 Copia e incolla il seguente codice per creare una tabella e inserire una riga di dati utilizzando le istruzioni SQL : . 
 
createTable private Sub ( ) per
 Dim strSQL As String 
 
 strSQL = " CREATE TABLE myTbl ( fName TESTO , lName TESTO ) " 
 
DoCmd.RunSQL ( strSQL ) per
 strSQL = "INSERT INTO myTbl ( 'John ', ' Smith' ) " 
 
 DoCmd.SetWarnings False 
 
DoCmd.RunSQL ( strSQL ) per
 End Sub 
 3 
 Premere " F5 " per eseguire la procedura . 
 4 
 lancio di Microsoft Excel , fare clic sulla scheda "Sviluppatore " e cliccare su " Registra macro "per avviare la registrazione di una macro VBA . Fare clic su " OK" nella finestra di dialogo " Registra macro " . Tipo "2" in A1 e "4" in " B1 ". Fare clic su " Interrompi registrazione " e fare clic su " Visual Basic " per avviare l'editor di VBA 
 5 
 Espandere la cartella "Moduli " e fare doppio clic su " Modulo1 " per visualizzare il seguente codice macro : . 
 
 Range (" A1") . Seleziona 
 
 ActiveCell.FormulaR1C1 = " 2" 
 
 Range (" B1 " ) . Seleziona 
 
 ActiveCell.FormulaR1C1 = " 4 " 
 6 
 Aggiungere il seguente codice alla macro per visualizzare l'aggiunta di A1 e B1 in C1 : 
 
 Dim a As Integer 
 
 Dim b As Integer 
 
 Dim totale As Integer 
 
 Range (" A1") . Seleziona 
 
 a = Range (" A1") . Valore 
 
 Range (" B1 " ) . Seleziona 
 
 b = Range (" B1 " ) . Valore 
 
 totale = a + b 
 
 Range (" C1" ) . Selezionare 
 
 ActiveCell.FormulaR1C1 = totale 
 7 
 Premere " F5 " per eseguire il codice macro VBA . 
 
              
Programmazione © www.354353.com