Hands - on erfaring er en av de beste måtene å få introdusert til Visual Basic for Applications ( VBA ) språk . VBA er et programmeringsspråk tilgjengelig i alle Microsoft Office-programmer som Access og Excel . I Access når du oppretter en ny database , du begynner vanligvis ved å opprette et bord og sette data inn i den. Denne prosessen kan lett bli automatisert gjennom brukeren av VBA. I Excel kan du automatisere oppgaver ved første opptak VBA-makroer . Du kan endre en VBA-makro for å møte dine behov etter at det er blitt registrert. Du trenger
Microsoft Office
Vis flere instruksjoner
en

Launch Microsoft Access , klikk "Blank Database , " og klikk på "Create" -knappen for å opprette en ny database. Klikk "Database Tools " og klikk " Visual Basic " for å starte VBA editor. Klikk på " Insert"-menyen og klikk " Module" for å sette inn en ny kode modul
2

Kopier og lim inn følgende kode for å lage et bord og sette inn en rad av data ved hjelp av SQL-setninger : .

Private Sub createTable ( )

Dim strSQL As String

strSQL = " CREATE TABLE myTbl ( fname TEKST, lname TEKST )"

DoCmd.RunSQL ( strSQL )

strSQL = " INSERT INTO myTbl VALUES (' JOHN ', ' SMITH ' )"

DoCmd.SetWarnings False

DoCmd.RunSQL ( strSQL )
< p> End Sub
3

Trykk " F5 " for å kjøre prosedyren.
4

Launch Microsoft Excel , klikker du på " Developer " og klikk "Record makro "for å starte innspillingen av en VBA-makro . Klikk " OK " i " Registrer makro " dialogvinduet. Type " 2" i A1 og " 4 " i " B1 ". Klikk på " Stopp registrering " og klikk " Visual Basic " for å starte VBA editor
5

Utvid " moduler "-mappen og dobbeltklikk på " Module1 " for å vise følgende makro kode : .

Range (" A1 ") . Velg

ActiveCell.FormulaR1C1 = " 2 "

Range (" B1 ") . Velg

ActiveCell.FormulaR1C1 = " 4 "
6

Legg til følgende kode i makroen for å vise tillegg av A1 og B1 i C1 : en

Dim et As Integer

Dim b As Integer

Dim total As Integer

Range (" A1 ") . Velg

a = Range (" A1 ") . Verdi

Range (" B1 " ) . Velg

b = Range (" B1 ") . Verdi

total = a + b

Range (" C1 ") . Velg

ActiveCell.FormulaR1C1 = total
7

Trykk " F5 " for å kjøre makroen VBA -kode.