VBA скрипт для автоматизации Excel, нажмите кнопку «ОК» диалогового окна

Question

на I (как не разработчик) пытаюсь создать VB скрипт для:

открыть электронную таблицу Excel (тот, который я не создавал), добавьте значения в поля, нажмите кнопку 'validate', которая проверяет формат этих полей для предопределенных правил, сохраните и закройте таблицу.

Бит, который я застрял, - это диалоговое окно, которое появляется, когда я нажимаю кнопку подтверждения. Мне просто нужно нажать кнопку «ok» или игнорировать диалоговое окно все вместе.

Я рассмотрел различные вещи, включая SendKeys и DisplayAlerts = False, но ни один из них не работает.

Мой код, как показано ниже:

Set objExcel = CreateObject("Excel.Application") 

objExcel.Visible=True 

Set objWorkbook=objExcel.Workbooks.Open("C:\TestSpreadsheet.xls") 
Set objWorksheet=objWorkbook.Worksheets(2) 

objExcel.Application.Visible=True 
objExcel.WorkSheets(2).Activate 



' objExcel.Workbooks.Add 
objExcel.WorkSheets(2).Unprotect 
objExcel.WorkSheets(2).Cells(3,1).Value="Test1" 
objExcel.WorkSheets(2).Cells(3,2).Value="Test1" 

' Click 'validate' button. 
objWorksheet.CommandButton2.Value = True 

'Click 'ok' 

?????? 


' Save the spreadsheet and close the workbook. 
' Specify Excel7 File Format. 
objExcel.ActiveWorkbook.Save 
objExcel.ActiveWorkbook.Close 


' Quit Excel. 
objExcel.Application.Quit 

Wscript.Echo "Done" 

Любые идеи будут оценены!

Answer 1

Вместо того, чтобы нажимать кнопку, чтобы говорить, вам нужно запустить событие, которое кнопка делает при нажатии. Обычно это событие Click.

Try:

objWorksheet.CommandButton2_Click() 

Чтобы запустить событие щелчка. Если это не удается, вы всегда можете просто запустить макросы или код, который делает кнопка, исследуя событие.