- Код: Выделить всё
Do While IE.ReadyState <> 4
Loop
DoEvents
Sleep 400
Set iFrm = IE.Document.Frames("frm_display")
iFrm.Document.all("DB_NOMER").Value = DB_NOMER
На последней строке получаю ошибку № 91 от ВБА
Решается она путём экспериментирования со строкой выше, то есть со строкой Sleep 400, уве-личивая её ошибка в дальнейшем пропадает. Но ведь выше неё и есть строки, которые знают когда страница загрузилась и пропускает код дальше, значит, они не срабатывают, как быть???
В то же время я вижу в разных примерах эти строки пишут по разному как же наиболее пра-вильно???
А также, почему, если я открываю страницу затем кликаю по ссылке на открытие другой стра-ницы и указываю IE.Visible = True 'открывает, делает видимым Микрософт Интернет Эксплоер
то бывают случаи, когда еще открывается не последняя страница, а предпоследняя, а потом на моих глазах открывается последняя страница именно открывается, а не грузится, как от этого избавиться.
Спасибо Эндрю