Field.Code-Eigenschaft (Publisher)

Gibt eine Zeichenfolge, die den Text angezeigt, wenn die Größe die Seitenansicht festgelegt ist, zum Anzeigen von Feldfunktionen darstellt. Schreibgeschützt.

Syntax

Ausdruck. Code

Ausdruck Eine Variable, die ein Field-Objekt darstellt.

Rückgabewert

Zeichenfolge

Beispiel

Dieses Beispiel durchläuft alle Felder in der aktiven Publikation und zeigt dann eine Meldung an, ob die Zeichenfolge "www" im Code eines der Felder gefunden wurde.

Sub FindWWWHyperlinks() 
 Dim intItem As Integer 
 Dim intField As Integer 
 With ActiveDocument.Pages(1).Shapes(1).TextFrame.TextRange.Fields 
 Do 
 intItem = intItem + 1 
 If InStr(1, .Item(intItem).Code, "www") > 0 Then 
 intField = intField + 1 
 End If 
 Loop Until intItem = .Count 
 End With 
 
 If intField > 0 Then 
 MsgBox "You have " & intField & " World Wide Web " & _ 
 "hyperlinks in your publication." 
 Else 
 MsgBox "You have no hyperlink fields in your publication." 
 End If 
End Sub

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.