Re: макросы: по просьбам трудящихся

Написал wOxxOm в 26/02/2007 15:32:32

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

on error resume next

анализ поиска:
Set i = pg.TextFind("Text1", True)
if i is nothing then msgbox "Нету!":goto Netu
......
......
......
.....
Netu:
....
...