So erhalten Sie den Wert des Dropdown-Menüs in Microsoft Word

Question

Ich habe ein Microsoft Word-Dokument mit einem Dropdown-Menü darin. Ich versuche, ein Makro zu schreiben, das den Wert des Dropdowns abruft und Berechnungen ausführt. Wie erhalte ich den Wert des Drop-downs?

Answer 1

Zuerst können Sie einen Verweis auf das Dropdown entweder durch den Namen erhalten, den Sie ihm gegeben haben (das Lesezeichen-Feld in der Eigenschaften-Box), oder durch seine Nummer in der Reihenfolge der hinzugefügten Felder.

Dann zeigen Sie mit der Eigenschaft Result den aktuell ausgewählten Wert an.

ich ein leeres Dokument mit zwei Dropdown-Listen auf sie erstellt (die Symbolleiste Formulare anzuzeigen, klicken Sie dann auf eine Schaltfläche, dass die Kontrolle an der Cursorposition einzufügen):

ColorDropdown 
    red 
    green 
    blue 

SizeDropdown 
    small 
    medium 
    large 

dann habe ich ein paar Testroutinen geschrieben:

Sub ListDropDowns() 
    Dim doc As Document, f As FormField 
    Set doc = ActiveDocument 

    For Each f In doc.FormFields 
    Say f.Name & " = " & f.Result 
    Next 
End Sub 

Sub ShowChosenColor() 
    Dim f As FormField 
    Set f = ActiveDocument.FormFields("ColorDropdown") 
    Say "color = " & f.Result 
End Sub 

Sub Say(s As String) 
    Debug.Print s 
End Sub 

das sind die Ergebnisse von ListDropDowns und ShowChosenColor aus dem Direkt-Fenster:

ColorDropdown = blue 
SizeDropdown = large 

color = blue 

etwas mehr Sofortiger Fenstertest:

set doc = ActiveDocument 

? doc.FormFields(1).Name 
ColorDropdown 

? doc.FormFields(2).Name 
SizeDropdown 

? doc.FormFields(2).Result 
large 


sName = doc.FormFields(2).Name 
? sName 
SizeDropdown 

sSize = doc.FormFields(sName).Result 
? sSize 
large