VBA Autofilter Excel 2013?

Я использую строку вроде:

Cells.AutoFilter 11, "0" 

на некоторое время для автоподготовки столбца 11 для «0».

Недавно я обновился до Microsoft Office 2013, и теперь я получаю AutoFilter method of Range class failed ошибки времени выполнения AutoFilter method of Range class failed с этой строкой. Это проблема совместимости с Office 2013 или какая-то другая проблема?

EDIT: Я должен уточнить, что я не получаю сообщение об ошибке с уже запущенной программой, а скорее строкой, которую я использовал раньше, и не работает для меня прямо сейчас.

EDIT2: Электронная таблица, над которой я работаю

Код:

 Dim firstRow As Integer Dim lastRow As Integer Dim firstCol As Integer Dim lastCol As Integer Dim allRange As Range Dim vRange As Range Dim bRange As Range Dim commentsCol As Integer Dim commentsColRng As Range Dim fieldNameCol As Integer Dim userCol As Integer If Cells(2, 1) <> "" Then firstCol = 1 lastCol = Cells(1, Columns.Count).End(xlToLeft).Column firstRow = 2 lastRow = Cells(Rows.Count, "A").End(xlUp).Row commentsCol = Rows(1).find("Comments").Column '11 fieldNameCol = Rows(1).find("Field Name").Column '8 userCol = Rows(1).find("User").Column '4 Set allRange = Range(Cells(firstRow, firstCol), Cells(lastRow, lastCol)) Set commentsColRng = Range(Cells(firstRow, commentsCol), Cells(lastRow, commentsCol)) Cells.AutoFilter Field:=1, Criteria1:="PF" Cells.AutoFilter commentsCol, "0", xlFilterValues Cells.AutoFilter Field:=2, Criteria1:="0", Operator:=xlFilterValues End If 

У меня есть три автофильтра, потому что я пытаюсь использовать несколько разных способов.

У вас может не быть ничего в столбце 11.

Например:

  AB --------------------- 1 field1 field2 2 a 0 3 b 1 4 c 2 5 d 23 Sub Test() ' this will succeed because column 2 (B) has something Cells.AutoFilter 2, "0" ' this will fail because column 3 (C) has nothing to filter on ' error message will be AutoFilter method of Range class failed Cells.AutoFilter 3, "0" End Sub 
  • Python Makepy с Office 2013 (офис 15)
  • VBA возвращает 2 варианта в MsgBox
  • VBA MACRO - экспорт адрес электронной почты в Excel
  • Объявление XML в Office 2013
  • Обновление кода Word VBA на 2013 год
  • Workbooks.Open метод метания HRESULT: 0x800A03EC
  • Ошибка приложения Excel 2013 - браузер не поддерживается
  • Вставка VBA из Excel в конец Word
  • Защищенный лист + скрытая fornula = четкие значения при входе в ячейку
  • Группирование данных спрятать данные из диаграммы?
  • Кто-нибудь знает исправление для конвертера VBA для Excel 2013?
  • Interesting Posts

    Excel: подсчитайте каждую дату в столбце и верните сумму дат (предпочтительно в формулу * one *)

    Возврат значения для фактического адреса ячейки

    Как обрабатывать локализацию даты в C # для настройки формата даты Excel?

    Используйте ручку заполнения для вертикальных данных, чтобы получить ее горизонтальную

    Загрузка разделенных данных Excel в базу данных MySQL

    Ошибка VBA при завершении операции или сброс, когда массив назначен в диапазон внутри Sub

    Мне нужно найти конкретную ячейку, основанную на трех факторах: Age, $ amount

    Код с использованием .address не выполняет код, хотя он работает без ошибок

    vba скопировать данные на лист, заменить значения ошибки?

    Макро с сохранением Текущая дата

    Шаблон Oracle Publisher Publisher Excel

    MS EXCEL – поиск / проверка значений нескольких столбцов на другом листе

    Excel Macro Macro / VBA Ошибка 1004 – Копировать вставить с переменной

    найти номер строки для соответствия значения и сохранить в переменной

    Как я могу обновить и сохранить файл excel из asp.net mvc?

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