Hvordan få tilgang Makro Fill kolonner med data

Hvordan få tilgang Makro Fill kolonner med data


Makroer er programmer som er skrevet med et skriptspråk, for eksempel Microsoft Office Visual Basic for Applications (VBA). VBA-makroer kan fylle kolonner i både Access og Excel, ved hjelp av metoder (dvs. funksjoner) av VBA-objektmodellen, et hierarki av virtuelle objekter. Fyll kolonner i Access og Excel innebærer å skrive kildekode som påberoper seg slike metoder med parametere satt til verdiene for å fylle kolonnene med. Ved hjelp av VBA-makroer i stedet for manuell inntasting å fylle kolonner med data reduserer tiden det tar å legge data til Access og Excel-tabeller.

Bruksanvisning

Fyll Excel kolonner med data

1 Åpne Excel og skriv utviklingen vindu VBA ved å trykke "Alt" + "F11".

2 Dobbeltklikk på "Project" i ruten "Dette arbeidsbok" element for å vise en rute for å legge inn ny programkode.

3 Lim vil programmet som vises nedenfor i den nye ruten. Dette programmet setter verdiene av celler egenskapen til Active objektet. Cellene egenskapen representerer alle celler i det gjeldende regnearket. "For" og "Neste" uttalelser i programmet danne en løkke struktur som fyller en kolonne i gjeldende regneark med data.

Public Sub FillColumns ()

Dim col

For col = 1 til 10

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

Neste col

End Sub

4 Klikk på en uttalelse av FillColumns program, trykk "F5" for å kjøre dette programmet da.

5 Gå tilbake til Excel ved å trykke "Alt" + "F11". Gjeldende regneark vil vise "somevalue" for de 10 første radene i regnearket første kolonne.

Fyll Tilgangs kolonner med data

6 Åpne Microsoft Access, og deretter opprette en ny database tabell ved å klikke på "Create" meny "Table" element.

7 Skriv "Felt1" i cellen ved siden av cellen som viser "ID", for å opprette en kolonne som heter "Felt1" i den nye tabellen. VBA-makro vil fylle dette feltet med data.

8 Trykk "Ctrl" + "S" type "Tabell 1" for tabellen navn, klikk "OK" for å lagre den nye tabellen.

9 Skriv inn VBA miljø ved å trykke "Alt" + "F11". Lag en ny kilde kode vindu ved å klikke på "Insert" -menyen er "Module" kommandoen.

10 Lim inn følgende kolonnen fyller programmet inn i den nye kildekoden vindu. Dette programmet oppfordrer RecordSet objektets Rediger og Oppdater metoder for å fylle Felt1 av Table1 med data.

Public Sub FillColumns ()

Dim dbs As DAO.Database

Dim recset Som DAO.Recordset

Dim i As Integer

Sett dbs = CurrentDb

Sett recset = dbs.OpenRecordset ( "Tabell 1")

For i = 1 til 10

recset.AddNew

recset! Felt1 = "The Wizard of Oz"

recset.Update

Neste jeg

End Sub

11 Kjør programmet ved å klikke på en av sine uttalelser og trykke "F5". Trykk "Alt" + "F11" for å gå tilbake til Access, og deretter dobbeltklikker du på navigasjonsruten er "Table1" element. Tabell 1 vises på nettet og vise en kolonne ( "Felt1") som makroen fylt med data.