Поиск  Пользователи  Правила 
Закрыть
Логин:
Пароль:
Забыли свой пароль?
Регистрация
Войти
 
Страницы: 1
RSS
Прекращение работы макроса в 16 офисе, Перенёс макрос из 13 в 16 офис и макрос перестал работать
 
Всем доброго дня.

Есть небольшой макрос для вывода диалогового окна фильтра.
Код
Sub Fil()
    s = Application.Dialogs(xlDialogFilter).Show(ActiveCell.Column)
End Sub

Перенёс его в 16 офис (в 13 работал) и он перестал работать - окно вызывается, но после это выдаётся ошибка "Невозможно получить свойство Show класса Dialog".

Может кто подсказать как поправить код?

Спасибо.
 
Валерий Кузнецов, у меня в 2013 не работает.
сейчас проверю почему

вот так работает
Код
Application.Dialogs(xlDialogFilter).Show
Изменено: ivanok_v2 - 4 Сен 2018 09:47:11
 
Доброе время суток.
Судя по описанию Built-In Dialog Box Argument Lists, метод Show для xlDialogFilter не имеет аргументов, следовательно не стоит туда ничего передавать.
Страницы: 1
Читают тему (гостей: 1)
Наверх