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

Answer 1

[Vitt02]

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

Woher ich das weiß: Recherche