Freigeben über


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.