Sie können sehen, was Stile in einem Dokument , indem Sie Word "Home "-Reiter . Aber die Umstellung auf dieser Registerkarte können Sie ziehen weg von der Registerkarte Sie derzeit arbeiten in , unterbricht Ihre Arbeit fließen. Sie können dieses Problem , indem er eine gedruckte Liste des Dokuments Stil Namen zu verhindern. Es ist möglich, diese Liste , indem Sie es schaffen, aber Word Programmiersprache Visual Basic kann es schneller zu erstellen. Anleitung
1
Klicken Sie auf das Menü "Datei" den Befehl "Öffnen" , dann zu navigieren und doppelklicken Sie auf eine Datei, deren Stile, die Sie auflisten möchten . Word wird die Datei zu öffnen.
2
Klicken Sie auf die Registerkarte "Entwicklertools" der " Visual Basic "-Befehl, dann fügen Sie das folgende Programm -Fragment in das Fenster in der Mitte des Bildschirms. Dieses Fragment durchläuft jede der Stile im aktuellen Dokument . Wort speichert diese Stile in einem virtuellen Objekt namens "Styles ", das ist ein Teil der " ActiveDocument " virtuelles Objekt .
Public Sub showStyles2 () Dim
instring , OutString , s, i, Pos.
s = " "
For i = 1 To
ActiveDocument.Styles.Count Next i TCM-
Documents.Add ActiveDocument.Content = s
End Sub
3
Fügen Sie die folgenden Aussagen nach dem " For i "-Anweisung im vorherigen Schritt aufgeführt. Diese neuen Aussagen lesen die Basis Stil der aktuellen Stil , und notieren Sie die Basis -Stil in einem String , es sei denn , dass Stil ist bereits in der Zeichenfolge. Jeder Stil in der "Styles "-Kollektion hat einen eigenen Namen . Allerdings ist dieser Name nur ein Deckname . Der wahre Name des Stils ist in der " BaseStyle " Eigenschaft .
Instring = ActiveDocument.Styles (i). BaseStyle
OutString = s
pos = InStr ( 1 , OutString , instring )
( pos = 0) Then
s = s & instring & "," End If
4
Klicken Sie auf eines der Aussagen in dem Programm, das Sie gerade eingefügt , dann klicken Sie auf den " Run "-Menü den Befehl "Ausführen" , um das Programm auszuführen. Klicken Sie auf das Symbol des neuen Word- Dokument, das in der Windows-Taskleiste erschienen ist . Des Dokuments erscheint und zeigt die Art Namen aller Stile im Dokument Sie in Schritt 1 geöffnet haben .
5
Presse "Control" und "P" gleichzeitig, um den Absatz von Stilnamen drucken.