в MS Office есть возможность включать обработчик ошибок, который потом можно использовать по своему усмотрению. Например:ЦитироватьOption ExplicitDim проверка As IntegerDim результат As StringSub проверка_на_буквы()результат = "ц" ' любой текстOn Error Resume Next ' включаем обработчик ошибокErr.Clear ' ниже то что может вызвать ошибкупроверка = результатIf Err.Number 0 Then ' Если ошибка не равно нулю, то Msg = "Ошибка" MsgBox Msg, , "Разработчик" Err.ClearEnd IfEnd SubЧто-нибудь подобное есть в OOo ???Уже запарился переводить макрокод под OOo
|