Sapere come aggiornare i dati in una query in Microsoft Office Access utilizzando Visual Basic, Applications Edition (VBA) può risparmiare tempo quando hai bisogno di continuo aggiornamento dei dati nelle tabelle. Access è un sistema di gestione di database relazionale utilizzato comunemente per i database locali. Una query viene utilizzata per visualizzare i dati in una tabella di database. VBA è un linguaggio di programmazione utilizzato per automatizzare le attività di routine in Access.

Istruzioni

1

Avviare Microsoft Office Access, selezionare "Strumenti di Database" e scegliere "Visual Basic". Selezionare dal menu "Inserisci", quindi fare clic su "Modulo".

2

Copiare e incollare il codice seguente nel modulo:

Private Sub updateQuery()

Dim db As Database

Dim rst As Recordset

Public sQLString As String

Dim rstCnt As Integer

Set db = CurrentDb

sQLString = "CREATE TABLE tableToUpdate (primo testo, ultimo testo)"

DoCmd.SetWarnings False

DoCmd.RunSQL (sQLString)

strSQL = "INSERT INTO tableToUpdate VALUES('Oscar','Gonzalez')"

DoCmd.RunSQL (strsql)

strSQL = "INSERT INTO tableToUpdate VALUES('Kitzia','Ramos')"

DoCmd.RunSQL (strsql)

strSQL = "INSERT INTO tableToUpdate VALUES('John','Smith')"

DoCmd.RunSQL (strsql)

strSQL = "INSERT INTO tableToUpdate VALUES('Anna','Williams')"

DoCmd.RunSQL (strsql)

Set rst = db. OpenRecordset ("SELECT tableToUpdate.* FROM tableToUpdate;")

RST. MoveLast

RST. MoveFirst

Per rstCnt = 0 a rst. RecordCount - 1

If rst.Fields(0).Value = "Oscar" Then

rst.Edit

rst.Fields(0).Value = "Emilio"

rst.Update

End If

RST. MoveNext

Prossimo rstCnt

End Sub

3

Premere "F5" per eseguire la subroutine "updateQuery". La subroutine crea una nuova tabella, inserisce nuove righe di dati, la tabella creata una query e aggiorna il primo campo.