Я пытаюсь перемещаться по Interent Explorer и загружать CSV с VBA. Я знаю, что сайт закодирован в html с помощью javascript, но я изо всех сил пытаюсь найти точку, где мне нужно использовать синтаксис VBA для javascript вместо html. Я также не знаю, является ли это правильным способом сделать это, поскольку документация, которую я нашел, онлайн не определена, чтобы покрыть мою определенную проблему. Я понимаю, что могу довольно легко выполнить это с python, но мне не хватает знаний, чтобы начать этот путь. Начиная с VBA, даже если это медленно.
Ниже моя текущая попытка и первая попытка кодирования автоматизации. Также, если кто-то знает, как запланировать запуск макроса, когда ОС "заблокирована", а не "вышла из системы", это было бы отлично, но сейчас мне действительно нужен автоматический способ получения этих данных.
Public Sub GrabCSV()
Dim IE As InternetExplorerMedium
Dim URL As String
Set IE = New InternetExplorerMedium
URL = "http://link"
With IE
.Visible = True
.Navigate URL
End With
Do While IE.Busy
DoEvents
Loop
'Current Attempt
IE.document.form.Select.getElementsByName("01").Selected = True
IE.document.form.Select.getElementsByName("02").Selected = True
IE.document.form.Select.getElementsByName("03").Selected = True
'Attempt 1
'IE.Document.form("highlight").Select
'IE.Document.(getElementsByTagName("option").selectedIndex = 1
'ListBox? - Line Selection
'Click "Get Dates for All ToolCodes..."
'Date Selection - 'From Date' and 'To Date'
'Click "Downtime Report"
'Click Radio button By Line,Date,DT Code
'Click "Download Report"
'Download .csv to folder
End Sub
У меня есть исходный код сайта, на котором я пытаюсь перейти. Я просто не могу опубликовать это без форматирования HTML, принимая его (пропуская важные пункты). Я добавлю ссылку на файл общего доступа здесь.
Варианты выбора:«Печь 1, 2, 3» и диапазон дат «10-3-2017» - «4-18-2018». Мне нужно загрузить данные в файл CSV для Excel, так как у меня есть другие макросы, которые обрабатывают этот CSV и распределяют его содержимое в различные файлы.