Hvordan Access og slette data med en makro
Brukere av databaseprogrammet Microsoft Access, noen ganger bruker makroer til å behandle sine data, inkludert data slettes. Makroer er programmer skrevet i Visual Basic for Applications (VBA), og kan automatisere en oppgave gjort gjennom tilgang som standard brukergrensesnitt. Slette data med VBA kan ta ulike former, avhengig av om de data som skal slettes er en hel kolonne eller et annet databaseobjekt. Sletting av data med makroer - i motsetning til manuelle metoder - sparer tid, og er mindre utsatt for feil enn manuell sletting.
Bruksanvisning
1 Åpne Microsoft Access og opprette en ny database ved å trykke "Ctrl-N", etterfulgt ved å klikke på "Blank database." Du vil lage et lite bord for denne databasen, og deretter bruke makroer til å slette data fra den.
2 Klikk "Table" under "Lag" -menyen, skriv "Product" i den øverste raden i tabellen nettets andre kolonne. Skriv "pris" i cellen direkte til høyre for "Product."
3 Skriv inn en eller to rader med eksempeldata i cellene under kolonnenavnene du nettopp skrev. For eksempel "Komprimert trekull," og "1.98" for en kunst forsyning bord.
4 Trykk "Ctrl-S" og trykk "OK" for å lagre tabellen med standardnavnet "Tabell1."
5 Trykk "Alt-F11" for å skrive VBA integrerte utviklingsmiljø (IDE), klikk deretter på "Module" under "Sett inn" menyen for å gjøre et nytt vindu for å skrive inn programmet makrokode.
6 Lim inn følgende program i vinduet. Dette programmet fungerer ved å åpne en RecordSet formål med den aktuelle databasen. Den RecordSet er basert på "Table1" tabellen du ferdig i trinn 4. MoveFirst metode (dvs. funksjon) av RecordSet flytter nåværende rekorden pekeren til tabellens første posten; Slett metoden sletter den første posten.
Public Sub DeleteRecord ()
Dim db As DAO.Database
Dim rcset Som DAO.Recordset
Dim str As String
Sett db = CurrentDb
Sett rcset = db.OpenRecordset ( "Tabell 1")
rcset.MoveFirst
rcset.Delete
rcset.Close
db.Close
End Sub
7 Kjør slette makroen ved deretter trykke klikke på en av sine uttalelser, "F5". Trykk "Alt-F11" for å returnere til standard tilgangsbrukergrensesnittet, og dobbeltklikk på "Table1" -ikonet i Access er navigasjonsruten, som er på skjermen til venstre. Tilgang vil åpne "Table1" for å avsløre at den første posten du skrev inn i trinn 3 er slettet.
8 Trykk "Alt-F11" for å gå tilbake til makrokoden i IDE, så limer du inn følgende nye programmet under den forrige du skrev. Dette programmet sletter "Price" -feltet fra bordet ved å kalle "Delete" metoden for "Tabell1."
Public Sub DeleteField ()
Dim db As DAO.Database
Dim rcset Som DAO.Recordset
Dim myTab Som TableDef-
Sett db = CurrentDb
Sett myTab = db.TableDefs ( "Tabell 1")
myTab.Fields.Delete ( "prisen")
db.Close
End Sub
9 Kjør programmet som du gjorde den forrige, og dobbeltklikk på "Tabell 1" i navigasjonsruten for å kontrollere at "Price" -feltet er borte.