behulp van Visual Basic for Applications om een lijst te lezen kunt u programma's die de inhoud van de documenten lezen en schrijven . Door dit te doen , kan je programma's die inhoud te wijzigen of toe te passen op een andere data - processing taak. Bijvoorbeeld , als uw VBA programma leest een lijst , het kan onderstreping of een andere opmaak toepassen op elke andere rij in de lijst , een tijdrovende taak als handmatig gedaan . Sla uw lijst - programma's lezen in de macro -enabled documenten , zoals Word of Excel 's docm 's xlsm formaat . Instructies
Excel
1 Klik op het menu "Bestand " " Nieuw " commando om een nieuwe werkmap te maken . Kopen van 2 Typ een lijst met getallen , letters of formules in een reeks opeenvolgende rijen in een werkblad in de werkmap . Typ bijvoorbeeld " appel ", " oranje " en " peer " in de cellen A1 tot en met A3 van de huidige spreadsheet . De VBA -programma zul je schrijft zal elk item in deze lijst .
3 Klik met de muis op het bovenste item in de lijst en sleep omlaag om de lijst van de laatste item en laat de muis . Deze actie selecteert de lijst .
4 Klik op het tabblad "Ontwikkelaar " , klik vervolgens op de knop " Visual Basic " om de VBA programmeeromgeving voeren .
5 Plak volgende programmacode in centraal venster van het milieu . Dit programma leest de inhoud van elke cel in je lijst met de eigenschap van het object Selection Cells , waarin de geselecteerde cellen vertegenwoordigt . De functie MsgBox toont de inhoud van de cel in een klein dialoogvenster . Public Sub Readlist ( ) Dim i
For i = 1 To Selection.Rows.Count < br MsgBox Selection.Cells > ( i , 1 ) op Twitter Volgende i End Sub
6
Klik enige verklaring in het programma , klik op de " Run " menu 's " Run " commando om het programma uit te voeren . Het programma zal een berichtvenster weer te geven voor elk item dat u hebt getypt in stap 2 .
Woord
7 Typ een lijst met woorden , ieder op zijn eigen lijn , klik op de muis op de bovenste woord .
8 Sleep naar beneden naar de onderste woord en laat de muisknop los om alle woorden in de lijst .
selecteren
9 Klik op de " Developer knop " tab 's " Visual Basic "om de VBA programmeeromgeving voeren .
10 Plak volgende programma in het centrum venster van het milieu . Dit programma leest de " Paragraaf " eigendom van de " Selection " object, dat de lijst die u geselecteerd heeft . De " MsgBox " wordt de inhoud van elke paragraaf . Public Sub Readlist ( )
Dim i
Voor i = 1 To
Selection.Paragraphs.Count MsgBox Selection.Paragraphs ( i ) . Range.Text
Volgende i End of Sub
11 Klik op een van de verklaringen van het programma , druk dan op " F5 "om het programma uit te voeren . VBA zal elk item in uw lijst en verslag dat artikel aan u .
Lezen |
