Slik leser du en liste med VBA

Ved hjelp av Visual Basic for Applications for å lese en liste kan du skrive programmer som leser innholdet i dokumentene. Ved å gjøre dette, kan programmene endre innholdet eller bruke den til et annet databehandlings oppgave. For eksempel, som VBA programmet leser en liste, kan det bruke understreking eller annen formatering til annenhver rad i listen, en tidkrevende oppgave hvis det gjøres manuelt. Lagre liste-lesing programmer i makroaktiverte dokumenter, for eksempel Word DOCM eller Excel xlsm format.

Bruksanvisning

Excel

1 Klikk på "File" -menyen er "Ny" -kommandoen til å lage en ny arbeidsbok.

2 Skriv en liste med tall, bokstaver eller formler i en serie påfølgende rader i alle regneark i arbeidsboken. For eksempel "eple", "oransje" og "pære" i cellene A1 til A3 av det gjeldende regnearket. VBA-programmet du skal skrive, vises hvert element i denne listen.

3 Klikk med musen på toppen element i listen, og dra ned til listens siste elementet og slipp musen. Denne handlingen velger listen.

4 Klikk på "Utvikler" fanen, klikk på "Visual Basic" -knappen for å gå inn i VBA programmering miljø.

5 Lim inn følgende programkode i miljøet sentrale vinduet. Dette programmet leser innholdet i hver celle i listen ved hjelp av celler tilhører Utvalg objekt, som representerer de valgte cellene. Den MsgBox funksjonen viser celleinnholdet i en liten dialogboks.

Public Sub ReadList ()

Dim jeg

For i = 1 Til Selection.Rows.Count

MsgBox Selection.Cells (i, 1)

Neste jeg

End Sub

6 Klikk på en uttalelse i programmet, klikk på "Kjør" menyen "Kjør" -kommandoen til å kjøre programmet. Programmet vil vise en meldingsboks for hvert element du skrev inn i trinn 2.

Ord

7 Skriv en liste over ord, hver på sin egen linje, og klikk deretter på musen på toppen ordet.

8 Dra ned til den nederste ordet og slipp musen til å velge alle ordene i listen.

9 Klikk på "Utvikler" fanen "Visual Basic" -knappen for å gå inn i VBA programmering miljø.

10 Lim inn følgende program i miljøet sentrum vinduet. Dette programmet leser "Avsnitt" eiendom av "Selection" objekt, som inneholder listen du valgte. Den "MsgBox" viser innholdet i hvert avsnitt.

Public Sub ReadList ()

Dim jeg

For i = 1 Til Selection.Paragraphs.Count

MsgBox Selection.Paragraphs (i) .Range.Text

Neste jeg

End Sub

11 Klikk på en av programmets utsagn, trykk "F5" for å kjøre programmet da. VBA vil lese hvert element i listen og rapportere dette elementet til deg.