Sapere come salvare le informazioni da una tabella a un'altra tabella consente di risparmiare tempo durante il trasferimento di dati in un database . Microsoft Office Access è un sistema di gestione di database relazionali incluso nella suite Microsoft Office . Visual Basic, Applications Edition (VBA ) è un linguaggio di programmazione sviluppato da Microsoft . VBA può essere utilizzato in Access per automatizzare i processi altrimenti eseguite manualmente . In pochi passi è possibile scrivere codice VBA per interrogare i dati da una tabella e salvarlo in un'altra tabella . Istruzioni
1
Avviare Microsoft Office Access 2007 e selezionare " Database vuoto ", quindi fare clic su "Crea ". Fare clic su " Strumenti di database ", quindi selezionare " Visual Basic ".
2
Fare clic sul campo "Inserisci" e selezionare " Modulo ".
Copia e incolla il seguente codice nel tuo modulo :
createNewTable private Sub ( ) per
Dim rst come Recordset
Dim db As Database Dim
sqlstr As String
sqlstr = "CREATE TABLE CustomerInfo ( TESTO Nome ( 25 ) , testo Cognome ( 25) ) ; "
DoCmd.RunSQL ( sqlstr ) per
sqlstr = " INSERT INTO CustomerInfo ( [Nome] , [Cognome ] ) "
sqlstr = sqlstr &" VALUES (' John' , 'Williams '); "
DoCmd.SetWarnings False
DoCmd.RunSQL ( sqlstr ) < br >
sqlstr = " INSERT INTO CustomerInfo ( [Nome] , [ Cognome] ) "
sqlstr = sqlstr & " VALUES (' Carlo ', ' Gonzalez '); "
DoCmd . SetWarnings False
DoCmd.RunSQL ( sqlstr ) per
sqlstr = " CustomerInfo.FirstName SELECT, "
sqlstr = sqlstr & " CustomerInfo.LastName INTO CharlesInfo "
sqlstr = sqlstr & "FROM CustomerInfo "
sqlstr = sqlstr & "WHERE ( ( ( CustomerInfo.FirstName ) = ' Carlo ')); "
DoCmd.SetWarnings False < br >
DoCmd.RunSQL ( sqlstr ) per
End Sub
3
Premere " F5 " per eseguire la subroutine . Il codice crea una nuova tabella e aggiungere due nuovi record di dati. Una nuova tabella verrà creata dove " Nome " è uguale a " Charles ".