Форум программистов, компьютерный форум, киберфорум
VBA
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.64/11: Рейтинг темы: голосов - 11, средняя оценка - 4.64
29 / 15 / 12
Регистрация: 09.02.2018
Сообщений: 90
1

Ошибки #N/A, #ДЕЛ/0! и т.д

10.08.2018, 21:28. Просмотров 2272. Ответов 5
Метки нет (Все метки)

Ищу ошибки по индусски:

If Cells(1).Text="#ДЕЛ/0!" Then

Работает тока в локализованной версии офиса, в англоязычной - не работает!
Как нормально проверить ячейку на наличие ошибок???
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
10.08.2018, 21:28
Ответы с готовыми решениями:

Функция дел
Обозначим через ДЕЛ(n, m) утверждение «натуральное число n делится без остатка на натуральное число...

дел УРЛ ?
ломанули чужой кривой движок наплодили страниц 5000 штук("отзывов") еще и яша их проиндексил...

Шаблон планирования дел
Доброго времени суток! Скачал я тут на днях шаблон для планирования своих дел c ссылка...

Текущее состояние дел
Итак. Дело с новой партией худо бедно пошло. Поставщики комплектухи почти вышли из новогоднего...

5
Заблокирован
10.08.2018, 22:18 2
Visual Basic
1
2
3
if iserror(cells(1))then
'найдено без индусов
end if
0
29 / 15 / 12
Регистрация: 09.02.2018
Сообщений: 90
10.08.2018, 22:43  [ТС] 3
Мне нуна проверить на конкретную ошибку!
Тока на ошибку #ДЕЛ/0!, например! Или на ошибку #Н/Д
0
14927 / 6328 / 1721
Регистрация: 24.09.2011
Сообщений: 9,977
11.08.2018, 00:41 4
Лучший ответ Сообщение было отмечено КулХацкеръ как решение

Решение

КулХацкеръ, значения ошибок формируются функцией CVErr, напр.
Visual Basic
1
If Cells(1).Value=cverr(xlerrdiv0) Then
Список констант-ошибок можно найти в справке в статьях XlCVError Enumeration, Cell Error Values
1
4057 / 2178 / 922
Регистрация: 01.12.2010
Сообщений: 4,541
11.08.2018, 08:39 5
Лучший ответ Сообщение было отмечено КулХацкеръ как решение

Решение

Если ячейка может и не содержать значение ошибки, то вместо связки iserror + cverr можно использовать обычный поиск, т.е.

Visual Basic
1
MsgBox Not [A1].Find("#DIV/0!", , xlValues, xlWhole) Is Nothing
или даже стандартную функцию рабочего листа

Visual Basic
1
MsgBox Application.CountIf([A1], "#DIV/0!") = 1
Причём, для #Н/Д есть даже своя

Visual Basic
1
MsgBox Application.IsNA([A1])
P.S. MsgBox. разумеется, только для наглядности
1
29 / 15 / 12
Регистрация: 09.02.2018
Сообщений: 90
11.08.2018, 10:56  [ТС] 6
Тысяча благодарностей!
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
11.08.2018, 10:56

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь.

Отдельные списки дел в БД
У меня есть задание, где нужно создать список дел на рhp. И это уже сделано. Но проблема в том что...

Оцените положение дел с винтом.
Добрый день, решил проверить винт своего компа. Что можете сказать по результатам HDD SCAN?...

To do list - сохранить список дел
Добрый день. Я делю to do list. В качестве компонента для отображения задач я выбрал TreeView,...

Программа для учета дел
Программа для учета дел: Заметка (заголовок, текст) и ее разновидность - Напоминание (дата/время...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
6
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2020, vBulletin Solutions, Inc.