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

Вход

Регистрация

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

 

= Мир MS Excel/очистка скрытых фильтром строк - Мир MS Excel

Регистрация · Логин: · Пароль: · · Забыли пароль?
Страница 1 из 11
Модератор форума: _Boroda_, Pelena, Manyasha, SLAVICK 
Мир MS Excel » Вопросы и решения » Вопросы по VBA » очистка скрытых фильтром строк (Макросы/Sub)
очистка скрытых фильтром строк
pton Дата: Суббота, 02.12.2017, 16:51 | Сообщение № 1
Группа: Пользователи
Ранг: Прохожий
Сообщений: 4
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
Здравствуйте!

Задача состоит в маркировке определенных строк. В определенный столбец заносится определенный символ. При выборе фильтра и нажатии на определенную кнопку должны маркироваться выбранные записи. Соответственно предыдущая маркировка должна быть очищена

Подскажите пожалуйста как можно очистить значения в строках скрытых фильтром. Отключать фильтр и устанавливать, не вариант

Код типа
[vba]
Код
Columns(1).SpecialCells(xlCellTypeConstants, xlTextValues).Clear  
или
Columns(1).Clear  
или
Columns(1).ClearContents  
или
Range("A:A").Value = Empty
[/vba]

очищают только отфильтрованные видимые ячейки


Сообщение отредактировал pton - Суббота, 02.12.2017, 16:57
 
Ответить
СообщениеЗдравствуйте!

Задача состоит в маркировке определенных строк. В определенный столбец заносится определенный символ. При выборе фильтра и нажатии на определенную кнопку должны маркироваться выбранные записи. Соответственно предыдущая маркировка должна быть очищена

Подскажите пожалуйста как можно очистить значения в строках скрытых фильтром. Отключать фильтр и устанавливать, не вариант

Код типа
[vba]
Код
Columns(1).SpecialCells(xlCellTypeConstants, xlTextValues).Clear  
или
Columns(1).Clear  
или
Columns(1).ClearContents  
или
Range("A:A").Value = Empty
[/vba]

очищают только отфильтрованные видимые ячейки

Автор - pton
Дата добавления - 02.12.2017 в 16:51
bmv98rus Дата: Суббота, 02.12.2017, 17:18 | Сообщение № 2
Группа: Проверенные
Ранг: Ветеран
Сообщений: 685
Репутация: 113 ±
Замечаний: 0% ±

Excel 2013/2016
pton,
В лоб напрашивается перебор, проверка на Hidden и очистка.
 
Ответить
Сообщениеpton,
В лоб напрашивается перебор, проверка на Hidden и очистка.

Автор - bmv98rus
Дата добавления - 02.12.2017 в 17:18
vikttur Дата: Суббота, 02.12.2017, 17:41 | Сообщение № 3
Группа: Друзья
Ранг: Старожил
Сообщений: 2555
Репутация: 460 ±
Замечаний: 0% ±

 
Ответить
СообщениеКросс
http://www.excel-vba.ru/forum/index.php?topic=5406.0
http://www.planetaexcel.ru/forum....e816393

Автор - vikttur
Дата добавления - 02.12.2017 в 17:41
pton Дата: Суббота, 02.12.2017, 17:43 | Сообщение № 4
Группа: Пользователи
Ранг: Прохожий
Сообщений: 4
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
если я ячеек до 1000 на вопрос, а если больше это надо будет заставить пользователя пить кофе

У меняя в списке сейчас около 2500
 
Ответить
Сообщениеесли я ячеек до 1000 на вопрос, а если больше это надо будет заставить пользователя пить кофе

У меняя в списке сейчас около 2500

Автор - pton
Дата добавления - 02.12.2017 в 17:43
pton Дата: Суббота, 02.12.2017, 18:39 | Сообщение № 5
Группа: Пользователи
Ранг: Прохожий
Сообщений: 4
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
Решение найдено здесь

Решение такое

[vba]
Код

    ActiveWorkbook.CustomViews.Add ViewName:="TempView", RowColSettings:=True
    ' -------------------------------------------------
    ' Отключаем фильтр и выполняем необходимые действия
    ' -------------------------------------------------
    ActiveWorkbook.CustomViews("TempView").Show
[/vba]
 
Ответить
СообщениеРешение найдено здесь

Решение такое

[vba]
Код

    ActiveWorkbook.CustomViews.Add ViewName:="TempView", RowColSettings:=True
    ' -------------------------------------------------
    ' Отключаем фильтр и выполняем необходимые действия
    ' -------------------------------------------------
    ActiveWorkbook.CustomViews("TempView").Show
[/vba]

Автор - pton
Дата добавления - 02.12.2017 в 18:39
Мир MS Excel » Вопросы и решения » Вопросы по VBA » очистка скрытых фильтром строк (Макросы/Sub)
Страница 1 из 11
Поиск:

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