Форум программистов, компьютерный форум, киберфорум
VBA
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.52/195: Рейтинг темы: голосов - 195, средняя оценка - 4.52
 Аватар для AndreA SN
1021 / 125 / 2
Регистрация: 26.08.2011
Сообщений: 1,219
Записей в блоге: 2

Узнать статус фильтра на рабочем листе: включен или выключен

19.02.2012, 19:38. Показов 37146. Ответов 2
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
как в VBA узнать статус фильтра на рабочем листе: включен или выключен?
Кнопка включения фильтрации в столбце реализована как переключатель. Мне нужно в любой момент узнать статус листа: включена на нем фильтрация или нет? Потому что если этого не знать и попытаться включить фильтрацию при уже включенном положении, то она отключится - и далее куча ошибок возникнет по программке. Переменную включения-выключения нет смысла делать - так как файл может быть сохранен при включенном фильтре
0
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
19.02.2012, 19:38
Ответы с готовыми решениями:

Как узнать, включен ли автофильтр в данном столбце или нет?
Может кто знает, как это узнать?

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

Написать программу которая проверяет включен или выключен бит(можете проверить), потом через rand значение бита сделаю
package javaapplication2; import java.io.IOException; public class JavaApplication2 { public static void main(String args)...

2
15155 / 6428 / 1731
Регистрация: 24.09.2011
Сообщений: 9,999
19.02.2012, 20:47
Цитата Сообщение от AndreA SN Посмотреть сообщение
включена на нем фильтрация или нет?
В смысле - есть ли "стрелочки" независимо от состояния - серые или синие?
Visual Basic
1
activesheet.autofiltermode 'True - есть стрелочки, False - нет стрелочек
1
 Аватар для AndreA SN
1021 / 125 / 2
Регистрация: 26.08.2011
Сообщений: 1,219
Записей в блоге: 2
19.02.2012, 20:54  [ТС]
Visual Basic
1
2
3
4
5
6
7
8
Public Sub Включение_фильтров()
    If ActiveSheet.AutoFilterMode = False Then ' если выключена фильтрация
        Selection.AutoFilter ' ВКЛЮЧАЕМ ФИЛЬТРАЦИЮ
    End If
    If ActiveSheet.AutoFilter.FilterMode = True Then ' если указаны условия фильтрования и часть строк скрыта
        ActiveSheet.ShowAllData ' ОЧИСТИТЬ ВСЕ ДАННЫЕ ФИЛЬТРОВАНИЯ
    End If
End Sub
может я где накосячил? На Офисе 2010 32-bit на 64-bit системе - глюк выкинула
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
19.02.2012, 20:54
Помогаю со студенческими работами здесь

Intel HAXM включен, но выключен
Для эмуляции андроида в Android Studio на компьютере требуется установить программу Intel HAXM, а также включить vt-x в настройках UEFI. ...

Как можно узнать включен IP на прослушивание или нет?
Привет всем подскажите как это реализовать практически буду Благодарен каждому ответу. Есть удаленный IP к примеру 192.168.0.1 ...

Не могу узнать какой включен режим pio или dma
Всем привет. Во всех статьях пишут, для того, чтобы включить режим DMA необходимо зайти в диспетчер устройств -> Контроллеры IDE...

Как узнать - пустая ячейка или нет на листе Excel
если ячейка В2 пустая записываю данные в нее если не пустая то переход на В3 и так далее до В25

Поиск на рабочем листе по первой букве
Посоветуйте как осуществить поиск на рабочем листе, по первым буквам слова...Как такое проделывать с БД я знаю. Есть столбец с...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Новые блоги и статьи
Модульный подход на примере F#
DevAlt 06.03.2026
В блоге дяди Боба наткнулся на такое определение: В этой книге («Подход, основанный на вариантах использования») Ивар утверждает, что архитектура программного обеспечения — это структуры,. . .
Управление камерой с помощью скрипта OrbitControls.js на Three.js: Вращение, зум и панорамирование
8Observer8 05.03.2026
Содержание блога Финальная демка в браузере работает на Desktop и мобильных браузерах. Итоговый код: orbit-controls-threejs-js. zip. Сканируйте QR-код на мобильном. Вращайте камеру одним пальцем,. . .
SDL3 для Web (WebAssembly): Синхронизация спрайтов SDL3 и тел Box2D
8Observer8 04.03.2026
Содержание блога Финальная демка в браузере. Итоговый код: finish-sync-physics-sprites-sdl3-c. zip На первой гифке отладочные линии отключены, а на второй включены:. . .
SDL3 для Web (WebAssembly): Идентификация объектов на Box2D v3 - использование userData и событий коллизий
8Observer8 02.03.2026
Содержание блога Финальная демка в браузере. Итоговый код: finish-collision-events-sdl3-c. zip Сканируйте QR-код на мобильном и вы увидите, что появится джойстик для управления главным героем. . . .
Реалии
Hrethgir 01.03.2026
Нет, я не закончил до сих пор симулятор. Эта задача сложнее. Не получилось уйти в плавсостав, но оно и к лучшему, возможно. Точнее получалось - но сварщиком в палубную команду, а это значит, в моём. . .
Ритм жизни
kumehtar 27.02.2026
Иногда приходится жить в ритме, где дел становится всё больше, а вовлечения в происходящее — всё меньше. Плотный график не даёт вниманию закрепиться ни на одном событии. Утро начинается с быстрых,. . .
SDL3 для Web (WebAssembly): Сборка библиотек: SDL3, Box2D, FreeType, SDL3_ttf, SDL3_mixer и SDL3_image из исходников с помощью CMake и Emscripten
8Observer8 27.02.2026
Недавно вышла версия 3. 4. 2 библиотеки SDL3. На странице официальной релиза доступны исходники, готовые DLL (для x86, x64, arm64), а также библиотеки для разработки под Android, MinGW и Visual Studio. . . .
SDL3 для Web (WebAssembly): Реализация движения на Box2D v3 - трение и коллизии с повёрнутыми стенами
8Observer8 20.02.2026
Содержание блога Box2D позволяет легко создать главного героя, который не проходит сквозь стены и перемещается с заданным трением о препятствия, которые можно располагать под углом, как верхнее. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru