VBA Excel как программно "отлавливать" ошибки?

[HTF_1]

Уважаемые форумчане!

У меня программа открывает в цикле множество файлов (ну и далее обрабатывает их содержимое)

но иногда она пытается открыть несуществующий файл и при этом, к сожалению, выполнение прерывается и выдается сообщение об ошибке

On Error Resume Next помогает не полностью, т.к. для возобновления выполнения программы все равно необходимо в появляющемся окне с сообщением об ошибке нажать вручную "ОК"

подскажите пожалуйста: как сделать, чтобы выполнение программы не прерывалось?

Заранее спасибо за ответ

[Qwertiy]

Проверять файл на существование?

[ger_kar]

On Error Resume Next помогает не полностью

Ну как вариант использовать On Error Goto и обрабатывать ошибку, а не просто ее пропускать. Но лучше конечно использовать вариант предложенный Qwertiy

[HTF_1]

Проверять файл на существование?

я не знаю как проверить наличие файла перед его открытием...

т.к. файлы программа скачивает из интернета и я заранее не могу знать: есть данная страница на этом сайте или нет...

может быть можно как-то попробовать сначала через Iternet Explorer попробовать проверить наличие данной страницы на сайте?

но я в IE программировать к сожалению, пока не умею...
подскажите, пожалуйста: может кто-то уже сталкивался с данным вопросом...

[ger_kar]

Я например так и не понял, что требуется, то ли проверять доступность страницы на web ресурсе, то ли проверять есть ли файл в папке со скачанными файлами. Обрабатывать ошибку в On Error Goto пробовал? Какая ошибка? Как обрабатывал?

[HTF_1]

требуется проверять доступность страницы на web ресурсе

[Qwertiy]

Я что-то не понимаю, или "А при чём тут Excell?"

[ger_kar]

Я что-то не понимаю, или "А при чём тут Excell?"

Наверное, что-то загружается из Web ресурса и переноситься в Excel, прайс например, или еще чего нибудь.

А по теме могу посоветовать подключить к проекту Microsoft Internet Controls и заюзать его. В частности в его состав входит объект InternetExplorer, у которого имеются все нужные методы и свойства в т.ч. Navigate и событие NavigateError и другие.

[oleg]

Проверять файл на существование?

что за метод использовать? я всегда тоже делал, если ошибка при открытии файла, значит нет его ))

[ger_kar]

Dir$ [(PathName[, Attributes])]
Функция Dir служит для проверки существования каталога или файла, отвечающих заданному образцу. Функция поддерживает использование подстановочных знаков для нескольких символов(*) и одиночного символа(?) для указания нескольких файлов. Функция возвращает первое имя файла, имя которого соответствует аргументу PathName. Для получения остальных файлов, имена которых соответствуют PathName, следует повторно вызвать функцию Dir без аргументов. Последовательные вызовы функции без аргументов возможны до тех пор, пока имеются файлы или папки, соответствующие образцу первого вызова(с аргументами)
Примечание: Рекурсивные вызовы функции Dir запрещены
Функция возвращает данные типа String, структурно представляющего имя файла или папки, которые удовлетворяют указанному шаблону имени файла, набору атрибутов файла или метке тома на диске. Если аргумент PathName не найден, то функция Dir возвращает пустую строку(" ")
Примечание: Если после возврата функцией пустой строки, снова вызвать функцию без аргументов, то возникает ошибка времени исполнения
PathName
Необязательный аргумент. Строковое выражение, указывающее имя файла. Также может содержать имя каталога или папки и диска. При использовании имен файлов или папок, содержащих пробелы следует использовать дополнительные кавычки - Dir(""C:\Русский Проект\app.exe"") или Dir(Chr(34) & "C:\Русский Проект\app.exe" & Chr(34))
Примечание: Хотя PathName указан, как необязательный аргумент, он обязателен при первом вызове функции, а также в случаях, если задан аргумент Attributes
Attributes
Необязательный аргумент, содержащий константу или числовое выражение, описывающее атрибуты файла. Если этот аргумент опущен, возвращаются все файлы, имена которых удовлетворяют содержимому аргумента PathName. Допустимые значения Attributes
vbNormal=0
Обычное состояние файла.Используется по умолчанию
vbReadOnly=1
Атрибут только для чтения
vbHidden=2
Скрытый атрибут
vbSystem=4
Системный атрибут
vbVolume=8
Метка тома
vbDirectory=16
Каталог или папка
Примечание: Можно также указывать комбинации атрибутов путем их суммирования
Например, vbHidden+vbDirectory выводит скрытые папки