Si può vedere ciò che è disponibile in un documento stili facendo clic sulla scheda "Home" di Word . Ma il passaggio a questa scheda si può tirare fuori dalla scheda si sta attualmente lavorando, che interrompe il flusso di lavoro . È possibile impedire che il problema di avere una lista stampata dei nomi di stile del documento. E 'possibile creare questo elenco digitandolo , ma il linguaggio di programmazione Visual Basic di Word è possibile creare più rapidamente. Istruzioni
1

Cliccare il comando "Apri" del menu "File" , poi navigare e fare doppio clic su un file il cui stile si desidera elencare . Word verrà aperto il file .
2

Clicca comando " Visual Basic " del tab " Sviluppo " , quindi incollare il seguente frammento di programma nella finestra al centro dello schermo . Questo frammento scorre ciascuno degli stili nel documento corrente . Word memorizza questi stili in un oggetto virtuale chiamato "Stili ", che è parte dell'oggetto virtuale " ActiveDocument " .

Public Sub showStyles2 ( ) per

Dim inString , outstring , s , i, Ruolo

s = " "

For i = 1 To ActiveDocument.Styles.Count

Next i

Documents.Add

ActiveDocument.Content = s

End Sub
3

incollare le seguenti dichiarazioni dopo l'istruzione " For i " di cui al punto precedente . Queste nuove dichiarazioni leggono lo stile di base dello stile corrente , e registrare lo stile di base in una stringa , a meno che lo stile è già nella stringa . Ogni stile della collezione "Stili" ha un proprio nome . Tuttavia, quel nome è solo un nome in codice . Il vero nome dello stile è nella proprietà " BaseStyle " .

InString = ActiveDocument.Styles ( i) . BaseStyle

outstring = s

pos = InStr ( 1 , outstring , inString ) per

( pos = 0) allora

s = s & inString & " , "

End If
4 < p > Fare clic su una qualsiasi delle dichiarazioni nel programma appena incollato , quindi fare clic su comando " Esegui" del menu " Run" per eseguire il programma . Fare clic sull'icona del nuovo documento di Word che è comparso nella barra delle applicazioni di Windows . Apparirà la finestra del documento e visualizzare i nomi di stile di tutti gli stili nel documento aperto nel passaggio 1 .
5

Premere " controllo" e "P" contemporaneamente per stampare il comma nomi di stile .