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.