Wie kann ich ausgewählte Werte in Word Formularen auf die Standardwerte zurücksetzen?
Hallo zusammen
Für meinen Arbeitsalltag habe ich eine Checkliste im Word erstellt. In dieser Checkliste habe ich zur Auswahl Entwicklertools eingefügt wie bspw. die Dropdownliste in der man 2 Werte auswählen kann.Das Speichern dieser Checkliste ist nicht nötig und somit wollte ich herausfinden, ob es möglich ist, sie zurückzusetzen ohne jedes Feld einzeln auszuwählen. Habe im Internet schon nach Lösungen gesucht, leider konnte nichts helfen.
Vielen Dank für eure Antworten
1 Antwort
Hallo zusammen
Konnte das Problem selbstständig durch 1-2 YT Videos lösen. Ich habe hierfür einen CommandButton eingefügt und ihn "Reset" bennant, danach habe ich ein Makro zu diesem erstellt. Den CommandButton findet man bei den Entwicklertools und um das Makro zu setzen muss man in den Entworfsmodus und 2x auf den CommandButton klicken.
Hier ist der hierfür benötigte Command:
Private Sub Reset_Click()
question_clear = MsgBox("Sicher dass du die Checkliste leeren möchtest? ", vbYesNo + vbQuestion, "Question")
If question_clear = 7 Then Exit Sub
If question_clear = 6 Then
Dim aCC As ContentControl
For Each aCC In ActiveDocument.ContentControls
aCC.Range.Select
If aCC.Type <> wdContentControlDropdownList Then
aCC.Range.Text = ""
Else
aCC.Type = wdContentControlText
aCC.Range.Text = ""
aCC.Type = wdContentControlDropdownList
End If
Next aCC
End If
End Sub
Im Anhang ist noch ein Bild, um zu sehen wie das ganze dann im Word aussieht
LG Vito
