Excel VBA, чтобы открыть веб-страницу с 3 выпадающего списка.Как выбрать из выпадающего списка 2 с первым пунктом в списке - PullRequest
Новая
       26

Excel VBA, чтобы открыть веб-страницу с 3 выпадающего списка.Как выбрать из выпадающего списка 2 с первым пунктом в списке

0 голосов
/ 14 марта 2012

Мне приходится копировать и вставлять веб-страницу ежедневно.На веб-странице есть 2 выпадающих списка.1 список для даты и другой список для времени.Может кто-нибудь посоветовать, как написать код для выбора даты и времени в макросе vba.

Мне нужно выбрать в списке 1 первую дату (т.е. вчерашнюю дату) и список 2, время (т.е. все)

См. Ниже раскрывающийся список.Я использую Internet Explorer 8
Список 1: Дата:
13/3/2011 (дата вчера)
14/3/2011 (дата сегодня)
15/3/2011 (дата завтра)

Список 2: Время:
-Все- (список всех событий за время)
00:00 до 01:59 (список только событий в 00:01:59)
С 02:00 до 02:59

1 Ответ

1 голос
/ 14 марта 2012

Попробуйте изменить это, чтобы работать для вас: 

Sub test

  dim IE as InternetExplorerMedium

  set IE = new InternetExplorerMedium

  IE.navigate "stackoverflow.com" 'Replace SO with your required page

  IE.document.getElementById("combo box 1").value = format(date - 1, "d/m/yyyy")
  IE.document.getElementById("combo box 2").value = format(date - 1, "d/m/yyyy")

  set IE = Nothing

End Sub

Редактировать: вам нужно будет найти идентификаторы полей, в которые вы хотите ввести информацию, просмотрев источник страницы.Замените «поле со списком 1» и «поле со списком 2» этими значениями.

Редактировать 2: Вам также понадобится установить ссылку на элементы управления Интернетом Microsoft

...