Använda Visual Basic for Applications för att läsa en lista kan du skriva program som läser innehållet i dokumenten . Genom att göra så , kan dina program förändra innehållet eller använda det till en annan databehandling uppgift. Till exempel , som din VBA -programmet läser en lista , kan den tillämpas understrykning eller annan formatering för varannan rad i listan , en tidskrävande uppgift om det görs manuellt . Spara dina lista - läsprogram i makroaktiverade dokument , såsom Word DOCM eller Excel xlsm format . Instruktioner
Excel
1
Klicka på " Arkiv " -menyn är " Ny " för att göra en ny arbetsbok .
2
Typ en lista med siffror, bokstäver eller formler i en serie successiva rader i alla kalkylblad i arbetsboken . Skriv till exempel " äpple ", "orange " och " päron " i cellerna A1 till A3 i det aktuella kalkylbladet . VBA -programmet du skriver visas varje objekt i den här listan .
3
Klicka med musen på den översta posten i listan , dra sedan ner till listans sista objektet och släpp mus. Denna åtgärd väljer listan .
4
Klicka på " Utvecklare " fliken, klicka sedan på " Visual Basic " -knappen för att komma in i VBA-programmering miljö .
5
Klistra in efter programkod i miljön centrala fönster . Detta program läser innehållet i varje cell i din lista med hjälp av Celler egenskapen av objektet Selection , som motsvarar nu vald cellerna . Den MsgBox funktion visar cellinnehåll i en liten dialogruta .
Public Sub ReadList ( ) katalog
Dim I
För i = 1 till Selection.Rows.Count
MsgBox Selection.Cells (i , 1 ) katalog
Nästa jag
End Sub
6
Klicka något uttalande i programmet , klicka sedan på " kör " -menyn är" kör " -kommandot för att köra programmet . Programmet kommer att visa en meddelanderuta för varje objekt du skrev i steg 2 .
Word
7
Typ en lista av ord som var på en egen rad , och klicka sedan på musen på översta ordet .
8
Dra ner till den nedersta ordet och släpp musknappen för att markera alla orden i listan .
9
Klicka på " Utvecklare " fliken för " Visual Basic " -knappen för att komma in i VBA-programmering miljö .
10
Klistra in följande program i miljön centrum fönster . Detta program läser " Punkt " egendom " Selection " objekt , som innehar den lista du valt . Den " MsgBox " visar innehållet i varje stycke .
Public Sub ReadList ( ) katalog
Dim jag
För i = 1 till Selection.Paragraphs.Count
< p> MsgBox Selection.Paragraphs (I). Range.Text
Nästa jag
End Sub
11
Klicka på en av programmets uttalanden , tryck sedan på " F5 " för att köra programmet . VBA kommer att läsa varje objekt i din lista och rapporten objektet till dig .
