Как проверить, открыт ли файл, прежде чем продолжить после открытия с помощью клавиш отправки в Excel VBA? - PullRequest
0 голосов
/ 03 июля 2019

Я открываю файл с веб-сайта. После того, как я отправил sendkeys "% {O}", мне нужно сначала открыть файл, прежде чем продолжить. Если я добавлю время ожидания или циклы после sendkeys, файл не откроется до тех пор, пока после этих циклов. Пожалуйста, обратите внимание, что я не знаю имени или местоположения файла, я просто открыл его по указанному мне пути.

Я уже пытался поместить Application.Wait, создать подпрограмму, которая просто считает, и использовать ее между открытием и записью на лист.

Application.SendKeys "%{O}" 'opens the workbook from IE
Set wb2 = ActiveWorkbook.Worksheets("Needed_Worksheet")
wb2.Cells(1,1) = "HELLO"

Я ожидаю записи в первой ячейке вновь открытой рабочей книги.

1 Ответ

0 голосов
/ 03 июля 2019

Теперь это работает, используя Sleep:

#If VBA7 Then
    Public Declare PtrSafe Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As LongPtr) 'For 64 Bit Systems
#Else
    Public Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long) 'For 32 Bit Systems
#End If

Затем позвоните:

Sleep 20000

Спасибо @DavidZemens за предложение

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...