ich arbeite mit Word 2000 und möchte in ein Formular zwei Dropdownformularfelder einfügen.
Diese sollen miteinander verknüpft sein.
D.h.: wenn ich in das erste Feld einen Eintrag mache z.B. Name soll im zweiten Feld automatisch die dazugehörende Telefonnummer erscheinen.
standardmässig gibt es keine möglichkeit, mehrere dropdownlistboxen zu verknüpfen. geht ausschließlich mit makros, die dann aber individuell pro dokument angepasst werden müssen.
Sub Telefon()
Dim oFld As FormFields
Set oFld = ActiveDocument.FormFields
Select Case oFld(„Name“).Result
Case Is = „Walter“
With oFld(„Telefon“).DropDown
.ListEntries.Clear
.ListEntries.Add „06134-3456“
.Value = 1
End With
Case Is = „Herbert“
With oFld(„Telefon“).DropDown
.ListEntries.Clear
.ListEntries.Add „07845-23432“
.Value = 1
End With
End Select
End Sub
Du musst in das 1. Dropdownfeld die Textmarke Name vergeben, für das 2. Dropdownfeld Telefon. Beim 1. DD gibst Du in den Eigenschaften - Makro ausführen bei - Verlassen, und gibst dieses Makro an.
Das Makro musst Du zuvor in Deine Vorlage für das Dokument hineinkopieren über Extras - Makro - Visual Basic Editor - dort links oben Deine Vorlage anklicken - Menue Einfügen - Modul - hier obiges Makro hineinkopieren. Die Namen (hier Herbert und Walter) gemäss Deinen Einträgen abändern ebenso die Telefonnummern. Dann das Formular schützen.