Bruke Visual Basic for Applications for å lese en liste lar deg skrive programmer som leser innholdet i dokumentene. Ved å gjøre dette , kan programmene endre innholdet eller bruke det på en annen data -prosessering oppgave. For eksempel , som VBA -programmet leser en liste , kan det gjelde understreking eller annen formatering til annenhver rad i listen , en tidkrevende oppgave hvis det gjøres manuelt . Lagre liste - lesing programmer i makro -aktiverte dokumenter , for eksempel Word docm eller Excel xlsm format. Instruksjoner
Excel
en
Klikk på " File" -menyen er " New "-kommandoen for å lage en ny arbeidsbok .
2
Type en liste over tall, bokstaver eller formler i en serie av suksessive rader i alle regneark i arbeidsboken . For eksempel " eple ", " oransje " og " pære " i cellene A1 til A3 av gjeldende regneark. VBA-programmet du skal skrive vil vise hvert element i denne listen .
3
Klikk med musen på det øverste elementet i listen, og dra ned til listens siste elementet og slipp mus . Denne handlingen velger listen .
4
Klikk på " Utvikler " fanen , og klikk deretter på " Visual Basic" -knappen for å gå inn i VBA programmering miljø .
5
Lim etter programkode i miljøet sentrale vindu . Dette programmet leser innholdet i hver celle i listen ved hjelp av celler eiendom Selection objekt, som representerer de valgte cellene . Den MsgBox funksjonen viser innholdet i cellen i en liten dialogboks .
Public Sub ReadList ( )
Dim i
For i = 1 To Selection.Rows.Count
MsgBox Selection.Cells ( i, 1 )
Neste i
End Sub
6
Klikk noen uttalelse i programmet , og klikk på " Kjør " -menyen er" Kjør "-kommandoen for å kjøre programmet . Programmet vil vise en meldingsboks for hvert element du skrev inn i trinn 2 .
Word
7
Type en liste over ord , hver på sin egen linje , og klikk musen på toppen ordet .
8
Dra ned til den nederste ordet og slipp musen for å 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 " Selection " objekt , som holder listen du har valgt. Den " MsgBox" viser innholdet i hvert avsnitt .
Public Sub ReadList ( )
Dim i
For i = 1 To Selection.Paragraphs.Count
< p> MsgBox Selection.Paragraphs ( i) . Range.Text
Neste i
End Sub
11
Klikk ett av programmets uttalelser, trykk " F5 "for å kjøre programmet. VBA vil lese hvert element i listen din, og rapporterer at varen til deg .