Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Вопросы по Microsoft Excel
Страницы: 1
RSS
Обработка ошибки в цикле
 
#1
29.05.2013 14:02:25
Уважаемые форумчане помогите пожалуйста Не работет обработка ошибок в цикле
вот кусочек на котором ошибка, ошибка обрабатывается 1 раз, при повторном возникновении выдает ошибку
Код
On Err GoTo dsa
If Sheets(1).Cells(i, 15) < 0 Then Sheets(1).Cells(i, 15) = 0
dsa:


Err.clear - не помогло(((
Если очень захотеть - можно в космос полететь ;)
 
 
 
#2
29.05.2013 14:04:44
По этому фрагменту ничего не понятно. Файл можете приложить?
Согласие есть продукт при полном непротивлении сторон
 
 
 
#3
29.05.2013 14:09:25
В dsa первым делом нужно Err.Clear
 
 
 
#4
29.05.2013 14:17:27
Код
If not iserror(Sheets(1).Cells(i, 15)) then
If Sheets(1).Cells(i, 15) < 0 Then Sheets(1).Cells(i, 15) = 0
end if

или
Код
'игнорируем ошибку
On error resume next
'цикл
For i = 1 to 10
If Sheets(1).Cells(i, 15) < 0 Then Sheets(1).Cells(i, 15) = 0
next i
'отключаем игнорирование ошибок
on error goto 0


А вообще лучше приводить не обсосанный кусочек кода, а такой отрезок, чтобы было понятно для чего такая обработка нужна. ну и на словах пояснить, какую ошибку обрабатываете и что хотите получить.
Даже самый простой вопрос можно превратить в огромную проблему. Достаточно не уметь формулировать вопросы...
 
 
 
#5
29.05.2013 14:57:45
спасибо!
Решение с игнорированием ошибки очень устраивает, хотелось бы узнать , возможно ли допустим сразу в  Sheets(1).Cells(i, 15).Formula = "=n" & i & "/100" & "*" & "e" & i дописать условие? допустим что то вроде если ошибка или Sheets(1).Cells(i, 15) < 0 то 0 в пртивном случае выводить результат решения формулы?
Если очень захотеть - можно в космос полететь ;)
 
 
 
#6
29.05.2013 15:14:11
не проверял:
Код
"=If(ISERROR(n" & i & "/100*e" & i & "),"""",n" & i & "/100*e" & i & ")"


а еще предположу, что можно проверять сразу:
Код
"=If(e" & i  & "<>0, n" & i & "/100*e" & i & "),"""")"
Даже самый простой вопрос можно превратить в огромную проблему. Достаточно не уметь формулировать вопросы...
 
 
 
#7
29.05.2013 15:19:47
The_Prist,  Спасибо огромное!
Если очень захотеть - можно в космос полететь ;)
 
 
 
Страницы: 1
Наверх