Excel Autofilter все, кроме значения переменной

Поэтому мне нужно отфильтровать все значения в строке, кроме одной. Я получил его для работы, используя эту часть кода, которая, очевидно, будет фильтровать все, но «Бельгия», но мне нужно, чтобы она была переменной.

Dim myValue As Variant myValue = InputBox("Which country to exclude? ") Range("AB1").Select ActiveSheet.Range("$B$1:$BY$319696").AutoFilter Field:=27, Criteria1:="<>Belgium" 

Для версии фильтра, где я фильтрую в конкретной стране, переменная работает просто отлично:

 Dim myValue As Variant myValue = InputBox("Which country to filter on: ") Range("AB1").Select ActiveSheet.Range("$B$1:$BY$319696").AutoFilter Field:=27, Criteria1:= _ myValue ActiveWindow.SmallScroll Down:=-30 

Так почему это не работает:

 ActiveSheet.Range("$B$1:$BY$319696").AutoFilter Field:=27, Criteria1:= <>myValue 

Также я не знаю, почему это структурировано так, оно было создано из Record Macro, особенно _ Criteria1:= _ myValue

«<>» Не является оператором (каким образом вы пытались использовать его в примере «не работает»), но скорее должны быть частью строки, которую вы передаете в AutoFilter (так вы это сделали в первом примере работы.)

ActiveSheet.Range("$B$1:$BY$319696").AutoFilter Field:=27, Criteria1:= "<>" & myValue должно работать.

  • Автофильтр, затем xlcelltypevisible выбирает пустые строки
  • Excel-VBA: проверьте, сколько элементов выбрано в фильтре столбцов (или ограничить выбор)
  • Множественные критерии фильтра для пробелов и чисел с использованием подстановочных знаков на одном поле просто не работают
  • Объединить критерии множественного исключения (<>) в AutoFilter
  • Excel Macro Autofilter и Delete Rows
  • Autofilter, затем скопировать и вставить диапазон
  • Могут ли расширенные критерии фильтра находиться в VBA, а не в диапазоне?
  • Установка автоматической фильтрации нескольких подстановочных знаков
  • Нужно добавить Fitler в Export to excel function
  • Как сделать Selection.AutoFilter начинается в строке 3 вместо строки 1
  • Код VBA для обновления автофильтров без повторного применения
  • Давайте будем гением компьютера.