2012-10-24 53 views
2

我试图从Word窗体上选定的下拉框中返回文本。VBA将Word文档中选定的下拉列表值复制到特定的Excel单元格中

word doc是一项调查,其中包含一个带有多个下拉框的表单。我想将调查对象从每个下拉列表中选择的值复制到Excel中的特定单元格中。

我已经试过的东西,如:我的代码

Activedocument.DropDowns("DropDown1").Value; 
Activedocument.DropDowns("DropDown1").Text; 
Activedocument.DropDowns("DropDown1").SelectedValue; 
Activedocument.Shapes("DropDown1").Value etc etc. 

当前适用部位:

Dim dd14 As FormFields 
With ActiveDocument 
Set dd14 = ActiveDocument.FormFields("Dropdown14").DropDown.Value 
Cells(iRow + 1, "H") = dd14 
End With 
+0

这是一个ActiveX控件,还是表单控件? Combobox或下拉列表? – scott

回答

0

要为传统形式下拉字段来获取值参考值(这是索引,而不是所选项目的文本)代码是:

activedocument.FormFields("dropdown1").DropDown.value 
+0

感谢您的回复。使用它,我会在“.Value”上得到类型不匹配错误。我刚刚粘贴了上面我的代码的适用部分。 – user1771800

+0

你得到一个类型不匹配,因为你设置一个表单对象等于一个值。如果你昏暗dd14只要我相信这应该工作 – scott

+0

得到它的工作,当我把暗淡整数,并删除“设置”谢谢你的帮助。 – user1771800

相关问题