2016-10-24 4 views
0

Я искал форум, но не нашел ответа на мой вопрос.VBA: ошибка времени выполнения «424» с автофильтром

Sub delMakro()

Dim rngAutoFill Как Диапазон

Set rngAutoFill = Range ("A1: Z1")

rngAutoFill.Select 
rngAutoFill.AutoFilter = True 

End Sub

Я получаю Ошибка выполнения '424', но не понимаю, почему

+0

Вы написали это в каком-то файле vbs или в коде за листом/книгой? Хорошая практика заключается в том, чтобы направить диапазон вместе с книгой и именем листа, чтобы код можно было повторно использовать. –

+0

В коде позади. Вы имеете в виду VBA-редактор? (Alt + F11) –

+0

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

ответ

0

Autofilter() метод может вернуться а (Variant) значение, но оно не может быть назначен значение, как вы пытаетесь сделать с rngAutoFill.AutoFilter = True

Если вы просто хотите, чтобы включить отображение раскрывающихся стрелки в соответствующем диапазоне, а затем использовать

rngAutoFill.AutoFilter '<-- if dropdown arrows were off, it turns them on and viceversa 

Если вы хотите сделать раскрывающиеся стрелки появляются в 1-м поле вашего диапазона

rngAutoFill.AutoFilter field:=1, VisibleDropDown:=True 

Если вы хотите сделать раскрывающиеся стрелки появляются на 2-й и 4-го поля вашего звенел e

rngAutoFill.AutoFilter field:=Array(2,4), VisibleDropDown:=True 
+0

@Petter__, это вам помогло? – user3598756

Смежные вопросы