Användare av databasprogram, Microsoft Access , ibland använder makron för att hantera sina uppgifter , inklusive radering av data. Makron är program skrivna i Visual Basic for Applications ( VBA ) , och kan automatisera alla uppgifter sker via Access "standard användargränssnitt . Att radera data med VBA kan ske på olika sätt , beroende på om de uppgifter som ska tas bort är en hel kolumn eller andra databasobjekt . Radera data med makron - i motsats till manuella metoder - sparar tid och är mindre utsatta för fel än manuell radering . Saker du behöver
Microsoft Access
Visa fler instruktioner
1
Öppna Microsoft Access och skapa en ny databas genom att trycka "Control - N , " följt av att klicka på " Blank databas. " Du kommer att skapa ett litet bord för denna databas , sedan använda makron för att radera data från det .
2
Klicka på " Tabell " under " Skapa " -menyn , skriv sedan " Produktnamn " i den översta raden av tabellgittret andra kolumnen . Typ " Pris " i cellen direkt till höger om " ProductName . " Addera 3
typ en eller två rader med exempeldata i cellerna under de kolumnnamn du just skrev . Till exempel , för att typ " Komprimerad träkol , " och " 1,98 " för en konst leverans bord .
4
Tryck " Ctrl- S " och tryck på " OK " spara tabellen med standard namnet " Tabell1 . "
5
Tryck " Alt - F11 " för att ange VBA : s integrerade utvecklingsmiljö ( IDE ) , klicka sedan på " Module " under " Infoga " -menyn för att göra ett nytt fönster för att ange ditt program makro kod .
6
Klistra in följande program i fönstret . Programmet fungerar genom att öppna ett Recordset-objekt i den aktuella databasen . Recordset baseras på " Tabell1 " bord du färdig i steg 4 . Den MoveFirst metoden ( dvs. funktion ) av RecordSet flyttar den aktuella posten pekaren till bordets första posten , . Den bort metoden bort den första posten
Public Sub DeleteRecord ( ) katalog
Dim db Som DAO . Databas
Dim rcset Som DAO.Recordset
Dim str As String
Set db = CurrentDb
Set rcset = Sub
7
Kör delete makrot genom att klicka på någon av sina uttalanden , sedan trycka " F5 ". Tryck på " Alt - F11 " för att återgå till den vanliga Access-gränssnittet , dubbelklicka sedan på " Tabell1 " -ikonen i Access : s navigeringsfönstret , som är på vänster skärm . Tillträde kommer att öppna " Tabell1 " avslöja att den första posten du angav i steg 3 ska utgå .
8
Tryck " Alt - F11 " för att återgå till din makrokoden i IDE , klistra sedan följande nytt program under den förra du skrev . Detta program stryks " Pris " fältet från tabellen genom att ringa " Delete " metod " Tabell1 . "
Public Sub DeleteField ( ) katalog
Dim db Som DAO.Database
Dim rcset Som DAO.Recordset
Dim myTab Som TableDef
Set db = CurrentDb
Set myTab = db.TableDefs ( " Tabell1 " ) katalog
myTab.Fields.Delete ( " Priset" ) katalog
db.Close
End Sub
9
Kör programmet som du gjorde tidigare , och dubbel på " Tabell1 " i navigeringsfönstret för att kontrollera att " Pris " fältet är borta .
