Makroer er programmer skrevet med et scriptsprog , som Microsoft Office Visual Basic for Applications ( VBA ) . VBA-makroer kan fylde kolonner i både Access og Excel , ved hjælp af metoder ( dvs. funktioner) i VBA objekt model , et hierarki af virtuelle objekter. Udfyldning kolonner i Access og Excel indebærer at skrive kildekode , der påberåber sig disse metoder med parametre til de værdier til at fylde de kolonner med . Brug VBA-makroer snarere end manuel indtastning til at fylde kolonner med data reducerer den nødvendige tid til at tilføje data til Access og Excel-tabeller . Ting du skal
Microsoft Access og Excel
Vis Flere Instruktioner
Fyld Excel Kolonner med data
1

Open Excel og indtast VBA udvikling vinduet ved at trykke på " alt " +" F11 ".
2

Dobbeltklik på " projekt " rudens " Dette projektmappe " element for at vise en rude for at komme ind nyt program kode.
3

Indsæt det program, der vises under i den nye rude. Dette program indstiller værdierne af cellerne ejendom ActiveSheet objekt. Celler ejendom repræsenterer alle celler i det aktuelle regneark . "For " og " Next" udsagn i programmet danner en løkke struktur, der udfylder en kolonne i det aktuelle regneark med data .

Public Sub FillColumns ()

Dim col
< p> For col = 1 til 10

ActiveSheet.Cells ( col , 1) = " somevalue "

Næste col

End Sub
4 < p> Klik på en opgørelse af FillColumns program, så tryk på " F5 " for at køre dette program.
5

Retur til Excel ved at trykke på " Alt" + " F11 ". Den aktuelle regneark vil vise " somevalue " for de første 10 rækker i regnearket første kolonne.
Fyld Access Kolonner med data
6

Open Microsoft Access , derefter oprette en ny database tabel ved at klikke på "Opret" menuen "Tabel" element.
7

Type " Felt1 " i cellen ved siden af ​​cellen , der viser "ID " for at oprette en kolonne kaldet " Felt1 " i den nye tabel . Din VBA-makro vil fylde dette felt med data.
8

Tryk på " Control" + "S ," type " Tabel1 " for tabellen navn, og klik derefter på "OK" for at gemme den nye tabel. < br >
9

Indtast VBA miljøet ved at trykke på " Alt" + " F11 ". Lav en ny kildekode vinduet ved at klikke på " Indsæt" menuen " Module" kommando.
10

Indsæt følgende kolonne - påfyldning program i den nye kildekoden vinduet. Dette program opfordrer RecordSet objektets redigere og opdatere metoder til at fylde Felt1 af Tabel1 med data.

Public Sub FillColumns ()

Dim DBS Som DAO.Database

Dim recset som DAO.Recordset

Dim i As Integer

Set dbs = CurrentDb

Set recset = dbs.OpenRecordset ( " Tabel1 " )

For i = 1 til 10

recset.AddNew

recset ! Felt1 = "The Wizard of Oz "

recset.Update

Næste jeg
< p > End Sub
11

Kør programmet ved at klikke på en af ​​sine udtalelser, og trykke på " F5 ". Tryk på " Alt" + " F11 " for at vende tilbage til Access , og derefter dobbeltklikke på navigationsruden s " Tabel1 " element. Tabel1 vises på nettet og vist en kolonne ( " Felt1 "), som din makro fyldt med data.