Microsoft Office Forum [ www.Office-Fragen.de ] >> READONLY <<
Microsoft Office 2003-2019 => Word => Thema gestartet von: Blade1981 am Juli 29, 2019, 12:38:45 Nachmittag
-
Hallo zusammen,
ich habe eine Vorlage erstellt, in welcher beim Starten automatisiert eine Abfrage erfolgt, mit welchem Wert das Dropdownfeld gefüllt werden soll.
Nun ist das Dropdownfeld aber zukünftig in der Fußzeile und ich kann das Element (Objekt) nicht mehr ansprechen. Was muss ich ändern, dass ich nun das in der Fußzeile befindliche Element ansprechen kann?
Vielen lieben Dank für eure Hilfe!
Bisheriger Code:
Private Sub Document_New()
Dim objCC As ContentControl
Dim objLE As ContentControlListEntry
Dim Message, Title, varValue
Message = "Welcher Wert?" & vbCrLf & vbCrLf & "1 = Auswahl 1" & vbCrLf & "2 = Auswahl 2"
Title = "InputBox Wertabfrage"
varValue = InputBox(Message, Title)
Select Case varValue
Case 1 To 2
Set objCC = ActiveDocument.ContentControls.Item(1)
Set objLE = objCC.DropdownListEntries.Item(varValue)
objLE.Select
Case Else
MsgBox "Bitte zwingend einen Wert auswählen"
fncFunktion1
End Select
End Sub