Du kan se, hvad stilarter er tilgængelige i et dokument ved at klikke på Word "Home " fanen. Men at skifte til denne fane kan trække dig væk fra fanen , du i øjeblikket arbejder i , der afbryder dit arbejde flow . Du kan forhindre dette problem ved at have en udskrevet liste over dit dokument stil navne. Det er muligt at oprette denne liste ved at skrive det, men Word Visual Basic programmeringssprog kan oprette det hurtigere. Instruktioner
1
Klik på " File" menuen "Åbn " kommando, og derefter navigere til og dobbeltklikke på en fil, hvis typografier , du ønsker at liste . Word vil åbne filen.
2
Klik på " Udvikler "-fanen er " Visual Basic " kommando, og derefter indsætte følgende program fragment i vinduet i midten af skærmen. Dette fragment gentages gennem hver af de stilarter i det aktuelle dokument . Word gemmer disse stilarter i et virtuelt objekt kaldet " Styles ", som er en del af " ActiveDocument " virtuelle objekt.
Public Sub showStyles2 ()
Dim inString , outstring , s , i, pos
s = " "
For i = 1 For at ActiveDocument.Styles.Count
Næste jeg
Documents.Add
ActiveDocument.Content = s
End Sub
3
Indsæt følgende udsagn efter "For jeg " erklæring er anført i det foregående trin. Disse nye udsagn læst bunden stil af den nuværende stil, og registrerer basen stil i en snor, medmindre stil er allerede i strengen . Hver stil i " Styles " indsamling har sit eget navn. Men det navn er kun et kodenavn . Den sande navnet på den typografi er i " BaseStyle " ejendom .
InString = ActiveDocument.Styles ( i) . BaseStyle
outstring = s
pos = InStr ( 1 , outstring , inString )
p Hvis ( pos = 0) Så
s = s & inString & " , "
End If
4
Klik på et af udsagn i det program, du lige indsatte , og klik derefter på "Kør" menuen "Kør" kommandoen til at udføre programmet. Klik på ikonet for den nye Word-dokument , der er dukket op i proceslinjen i Windows. Dokumentet vindue vil dukke op og vise stil navnene på alle de stilarter i det dokument, du åbnede i trin 1. .
5.
Tryk på " Control" og "P" samtidigt for at udskrive afsnit i stil navne. KAYAK
