Есть ли способ НЕ массива критериев в Excel VBA?

У меня есть столбец с известными значениями. 5 написаны на камне, а странный – новый. Мне нужно отфильтровать новое (неизвестное) значение. Если бы у меня было только 2 известных значения, я мог бы отфильтровать Criteria1 & 2, используя = "<>"

Поскольку мы не можем использовать Criteria3, 4, … Есть ли способ использовать что-то вроде:

Критерии1: = "<>" Массив ("Val1", "Val2", …)

(пояснение: я хочу показать все НЕ в массиве.)

Благодарю.

С такими данными, как:

введите описание изображения здесь

Мы хотим видеть все, кроме Val1 , Val2 и Val3

Вот один из подходов:

Sub AllButThree() Dim N As Long, ary(), c As Collection Dim i As Long, a As String, v As String ary = Array("Val1", "Val2", "Val3") Set c = New Collection N = Cells(Rows.Count, "A").End(xlUp).Row On Error Resume Next For i = 2 To N v = Cells(i, 1).Value If v <> ary(0) And v <> ary(1) And v < ary(2) Then c.Add v, CStr(v) End If Next i On Error GoTo 0 ReDim bry(1 To c.Count) For i = 1 To c.Count bry(i) = c.Item(i) Next i ActiveSheet.Range("$A$1:$A" & N).AutoFilter Field:=1, Criteria1:=(bry), Operator:=xlFilterValues End Sub 

Он создает массив того, что мы хотим видеть.

Interesting Posts

Как скопировать определенные столбцы с одного листа и вставить другой лист в другом диапазоне в первой строке?

как отображать 10 первых строк из листа excel с asp.net mvc 5

Транспонирование строк в столбцы с пробелом

Очистить содержимое ячейки, если значение ячейки равно "" без использования VBA

java Apache POI 3.9 Eclipse (чтение больших файлов xlsx)

Использовать результат формулы IF в формуле ячейки Excel с одиночной ячейкой

Как установить положение таблицы Excel из C #?

Удалить текст после второго дефиса

Открытие нескольких текстовых файлов с помощью VBA

Excel VBA: вывод отличительных значений и итоговых значений

Как рассчитать … медианную? час / день / месяц появления?

Проблема с функцией IsEmpty

Подсчитать количество вхождений (неизвестной) строки в столбце excel

Можно ли использовать таблицу Excel в качестве UDF?

VBA Соответствие дубликатов результатов в массиве и их запись в отсутствующих ячейках

Давайте будем гением компьютера.