VBA IE11locking更改为下拉值

我正在使用VBA打开一个网站，login，然后导航到某个页面。 有8个选项的下拉菜单。

我使用这个代码来将下拉列表更改为我想要的值，但是当我继续时，它总是恢复为默认值。 如何locking此更改？

Set Element = IE.Document.getElementsByName("date_range") Element.Item(0).Value = "custom" 

这是页码：

 <div class="SelectInput"> <select class="SelectInput-select" name="date_range"> <option value="all_time">All Time</option> <option value="today">Today</option> <option value="yesterday">Yesterday</option> <option value="this_month">Month to date</option> <option value="last_month">Last Month</option> <option value="this_year">Year to date</option> <option value="last_year">Last year</option> <option value="custom">Between...</option> </select> <div class="SelectInput-arrows">...</div> </div> 

谢谢，

Answer 1

你需要设置selected属性…. ref： https ： //www.w3schools.com/tags/tryit.asp？ filename =tryhtml_option_selected