如何使用Selenium VBA提取网站combobox选中的文本内容到Excel

问题原因 #

你当前使用.Value读取到的是<option>标签的value属性值（即1、2这类数字编码），要获取选中选项的展示文本，需要定位到当前处于选中状态的<option>元素，再读取它的文本属性。

解决代码 #

推荐使用Selenium VBA内置的下拉选择框处理方法实现，修改后代码如下：

' 将下拉框元素转换为Select对象
Dim ilSelect As Object
Set ilSelect = bot.FindElementByName("BeyanAdresi.IlKodu").AsSelect
' 读取选中项的展示文本写入单元格
Sayfa1.Cells(row, 19).Value = ilSelect.SelectedOption.Text

可选简化写法 #

也可以直接通过XPath定位选中的option元素读取文本：

Sayfa1.Cells(row, 19).Value = bot.FindElementByXPath("//select[@name='BeyanAdresi.IlKodu']/option[@selected]").Text

内容的提问来源于stack exchange，提问作者Mehmet Ali GÖREN