ContentControlListEntry.Text-Eigenschaft (Word)
Gibt einen Wert vom Typ String zurück, der den Anzeigetext eines Listenelements für ein Dropdownlisten- oder Kombinationsfeld-Inhaltssteuerelement darstellt, oder legt diesen Wert fest. Lese-/Schreibzugriff.
Syntax
Ausdruck. Text
Ausdruck Ein Ausdruck, der ein ContentControlListEntry-Objekt zurückgibt.
Hinweise
Listeneinträge müssen eindeutige Anzeigenamen aufweisen. Bei dem Versuch, die Text-Eigenschaft in eine Zeichenfolge zu ändern, die in der Liste der Einträge bereits vorhanden ist, wird ein Laufzeitfehler angezeigt.
Beispiel
Im folgenden Beispiel wird das erste Zeichen in Kleinbuchstaben im Anzeigetext jedes Listenelements groß geschrieben.
Dim objCC As ContentControl
Dim objLE As ContentControlListEntry
Dim strFirst As String
For Each objCC In ActiveDocument.ContentControls
If objCC.Type = wdContentControlComboBox Or objCC.Type = wdContentControlDropdownList Then
For Each objLE In objCC.DropdownListEntries
strFirst = Left(objLE.Text, 1)
If strFirst = LCase(strFirst) Then
objLE.Text = UCase(strFirst) & Right(objLe.Text, Len(objLe.Text) - 1)
End If
Next
End If
Next
Im folgenden Beispiel wird der Wert für das Listenelement basierend auf dem Inhalt des Anzeigetexts festgelegt.
Dim objCc As ContentControl
Dim objLe As ContentControlListEntry
Dim strText As String
Dim strChar As String
Set objCc = ActiveDocument.ContentControls(3)
For Each objLE In objCC.DropdownListEntries
If objLE.Text <> "Other" Then
strText = objLE.Text
objLE.Value = "My favorite animal is the " & strText & "."
End If
Next
Siehe auch
ContentControlListEntry-Objekt
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.