Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Удалить фильтр только на активном листе. - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Удалить фильтр только на активном листе. (Макросы/Sub)
Удалить фильтр только на активном листе.
Mark1976 Дата: Суббота, 29.03.2025, 07:38 | Сообщение № 1
Группа: Проверенные
Ранг: Ветеран
Сообщений: 799
Репутация: 3 ±
Замечаний: 0% ±

Excel 2010, 2013
Здравствуйте. Пользуюсь макросом "Удалить фильтр". Все устраивает. Его принцип удалить фильтр на всех листах. Надо чтобы макрос удалял фильтр только на активном листе. Заранее спасибо. [vba]
Код
Sub ShowAll()
   For i = 1 To Sheets.Count
       If Sheets(i).FilterMode = True Then Sheets(i).ShowAllData
   Next i
End Sub
[/vba]
 
Ответить
СообщениеЗдравствуйте. Пользуюсь макросом "Удалить фильтр". Все устраивает. Его принцип удалить фильтр на всех листах. Надо чтобы макрос удалял фильтр только на активном листе. Заранее спасибо. [vba]
Код
Sub ShowAll()
   For i = 1 To Sheets.Count
       If Sheets(i).FilterMode = True Then Sheets(i).ShowAllData
   Next i
End Sub
[/vba]
Автор - Mark1976
Дата добавления - 29.03.2025 в 07:38
Nic70y Дата: Суббота, 29.03.2025, 08:42 | Сообщение № 2
Группа: Друзья
Ранг: Экселист
Сообщений: 9114
Репутация: 2412 ±
Замечаний: 0% ±

Excel 2010
[vba]
Код
Sub ShowAll()
    ActiveSheet.ShowAllData
End Sub
[/vba]

ЮMoney 41001841029809
 
Ответить
Сообщение[vba]
Код
Sub ShowAll()
    ActiveSheet.ShowAllData
End Sub
[/vba]
Автор - Nic70y
Дата добавления - 29.03.2025 в 08:42
Апострофф Дата: Суббота, 29.03.2025, 08:43 | Сообщение № 3
Группа: Проверенные
Ранг: Обитатель
Сообщений: 466
Репутация: 129 ±
Замечаний: 0% ±

Excel 1997
Да уж.
[vba]
Код
Sub ShowAll()
If activeSheet.FilterMode = True Then activeSheet.ShowAllData
End Sub
[/vba]
 
Ответить
СообщениеДа уж.
[vba]
Код
Sub ShowAll()
If activeSheet.FilterMode = True Then activeSheet.ShowAllData
End Sub
[/vba]
Автор - Апострофф
Дата добавления - 29.03.2025 в 08:43
Mark1976 Дата: Понедельник, 31.03.2025, 06:53 | Сообщение № 4
Группа: Проверенные
Ранг: Ветеран
Сообщений: 799
Репутация: 3 ±
Замечаний: 0% ±

Excel 2010, 2013
Спасибо за решение.
 
Ответить
СообщениеСпасибо за решение.
Автор - Mark1976
Дата добавления - 31.03.2025 в 06:53
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Удалить фильтр только на активном листе. (Макросы/Sub)
  • Страница 1 из 1
  • 1
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2025 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!