Фильтрация данных в массиве

Старая форма входа

Страница 1 из 1 1
Модератор форума: китин, _Boroda_

Фильтрация данных в массиве (Макросы/Sub)

Xpert

Дата: Вторник, 03.08.2021, 14:36 | Сообщение № 1

Группа: Проверенные

Ранг: Форумчанин

Сообщений: 117

Репутация: 0 ±

Замечаний: 0% ±

Excel 2013

Приветствую всех!
Есть одномерный массив, содержащий нужные текстовые данные, а также буквосочетание "NA"(если значение недоступно).
Пытаюсь отфильтровать данный массив таким образом, чтобы эти самые "NA" убрать.
Однако код:
[vba]

Код

Sub Test()
Dim arr, myarr
arr = Range("E1").CurrentRegion
myarr = Filter(arr, "NA", False)
End Sub

[/vba]

выдаёт ошибку "Type mismatch".

В чём может быть дело?

Сообщение отредактировал Xpert - Вторник, 03.08.2021, 14:36

Ответить

Erjoma1981

Дата: Вторник, 03.08.2021, 15:48 | Сообщение № 2

Группа: Проверенные

Ранг: Участник

Сообщений: 66

Репутация: 25 ±

Замечаний: 0% ±

Excel 2010, 2019

Здравствуйте.
Может должно быть
[vba]
Код
set arr = Range("E1").CurrentRegion
[/vba]

Файл с примером упростил бы поиск ошибки.

Сообщение отредактировал Erjoma1981 - Вторник, 03.08.2021, 16:08

Ответить

doober

Дата: Вторник, 03.08.2021, 16:09 | Сообщение № 3

Группа: Друзья

Ранг: Ветеран

Сообщений: 970

Репутация: 332 ±

Замечаний: 0% ±

Excel 2010

Цитата Erjoma1981, 03.08.2021 в 15:48, в сообщении № 2 (

)

Может должно быть
set arr = Range("E1").CurrentRegion

Зачем советовать не изучив вопрос.
массив одномерный и string

Ответить

Xpert

Дата: Вторник, 03.08.2021, 17:14 | Сообщение № 4

Группа: Проверенные

Ранг: Форумчанин

Сообщений: 117

Репутация: 0 ±

Замечаний: 0% ±

Excel 2013

Erjoma1981, doober, всем спасибо!
Действительно, ошибка была в том, что фильтруемый массив не был одномерным.
После переназначения размерности всё заработало!

Ответить

Фильтрация данных в массиве (Макросы/Sub)

Страница 1 из 1
1