Гость
Войти | Профиль | Очистить
Действия ...
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / vba CountIf и длинная строка / 3 сообщений из 3, страница 1 из 1
03.02.2017, 14:58
    #39398243
sven1212
sven1212
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vba CountIf и длинная строка
Добрый день.
Помогите пожалуйста решить проблему.
Использую код для определения того, что введенное значение допустимо (существует на "Лист1")

Код: vbnet
1.
2.
3.
4.
5.
6.
...
vl = c1(i).Value
If Application.CountIf(Sheets("Лист1").Range("A1:A" & Sheets("Лист1").Cells.SpecialCells(xlLastCell).Row), vl) = 0 Then
     MsgBox("Ошибка в ячейке!")
End If
...



Проблема в том, что когда значение в проверяемой ячейке (c1(i).Value) - "очень длинная строка" (в моем случае 1536 символов кириллицей), получаю ошибку
Код: vbnet
1.
Run-time error '13': Type mismatch



В описании функции ограничений на длину второго параметра нет..
Как можно обойти эту проблему?

Спасибо!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
03.02.2017, 15:05
    #39398254
sven1212
sven1212
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vba CountIf и длинная строка
Опытным путем установил, что максимальная длина строки 255 символов.

Вопрос - как это обойти (подсчитать кол-во значений в <ячейке> представленных в заданном диапазоне другого листа)?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
03.02.2017, 15:11
    #39398265
Akina
Akina
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vba CountIf и длинная строка
sven1212получаю ошибкуНа каком из двух операторов - мы должны угадать?

И для проверки наличия лучше использовать
Код: vbnet
1.
If IsNothing(Range.Find(параметры)) Then
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / vba CountIf и длинная строка / 3 сообщений из 3, страница 1 из 1
Целевая тема:
Создать новую тему:
Автор:
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
созд. / загр.: 133ms
Закрыть
start [/forum/topic.php?fid=61&tablet=1&tid=2172787]:
 0ms
get settings:
 10ms
get forum list:
 12ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 29ms
get topic data:
 13ms
get forum data:
 3ms
get page messages:
 45ms
get tp. blocked users:
 2ms
others: 13ms
total:  133ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]