Dropdown-Formularfeld

03/04/2008 - 21:05 von Dirk Hennemann | Report spam
Hallo NG !

Ich habe mich mal durch das Netz geklickt um eine Lösng zu finden, wie ich
einen freien Wert in ein Dropdown-Formularfeld eingeben kann. Da bin ich auf
folgendes Makro gestoßen:

Sub Neuer_Eintrag()
If ActiveDocument.FormFields("Dropdown1").Result = "Andere" Then
andere1 = InputBox("Bitte geben Sie anderen Eintrag ein!" _
, "Anderer Eintrag")
With ActiveDocument.FormFields("Dropdown1")
.DropDown.ListEntries.Add Name:=andere1
.Result = andere1
End With
End If
End Sub

Das funktioniert auch bestens. Ich hàtte es aber gerne, dass der eingegebene
Wert nicht in den Eintràgen gespeichert wird, sondern nur für diesen Fall
dann ausgewiesen wird.. Geht das ?

Danke für die Antworten.

Mfg
Dirk Hennemann
 

Lesen sie die antworten

#1 Lisa Wilke-Thissen
04/04/2008 - 13:01 | Warnen spam
Hallo Dirk,

"Dirk Hennemann" schrieb

Ich habe mich mal durch das Netz geklickt um eine Lösng zu finden, wie ich
einen freien Wert in ein Dropdown-Formularfeld eingeben kann. Da bin ich
auf folgendes Makro gestoßen:


[...]

bitte wende dich mit Fragen zu Makros an news:microsoft.public.de.word.vba.
Die VBA-Experten tummels sich dort und schauen hier nur selten vorbei.

Viele Grüße

Lisa
MS MVP Word

Ähnliche fragen