Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Excel
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 16.10.2019, 15:00   #11
Elixi
Форумчанин
 
Регистрация: 10.05.2019
Сообщений: 163
По умолчанию

Цитата:
Сообщение от Iskin Посмотреть сообщение
, данные затираются.
да, данные затираются, нo этo не связанo с макрoсoм,
пoпрoбуйте без негo - этo какая-тo настрoйка чегo-тo,
выхoдите из ячейки через Esc, затираться не будут
Elixi вне форума Ответить с цитированием
Старый 16.10.2019, 15:31   #12
Serge_Bliznykov
Старожил
 
Регистрация: 09.01.2008
Сообщений: 26,238
По умолчанию

а если так?
Вложения
Тип файла: zip 4444.zip (26.5 Кб, 14 просмотров)
Serge_Bliznykov вне форума Ответить с цитированием
Старый 16.10.2019, 15:48   #13
Iskin
Форумчанин
 
Регистрация: 22.09.2008
Сообщений: 307
По умолчанию

Цитата:
Сообщение от Elixi Посмотреть сообщение
да, данные затираются, нo этo не связанo с макрoсoм,
пoпрoбуйте без негo - этo какая-тo настрoйка чегo-тo,
выхoдите из ячейки через Esc, затираться не будут
Действительно, попробовал на соседнем компе, там все отработало без затирания.
Думайте глобально - действуйте локально!
Iskin вне форума Ответить с цитированием
Старый 16.10.2019, 15:52   #14
Iskin
Форумчанин
 
Регистрация: 22.09.2008
Сообщений: 307
По умолчанию

Цитата:
Сообщение от Serge_Bliznykov Посмотреть сообщение
а если так?
А так и на своем компе не затирается)
Спасибо всем!!!
Думайте глобально - действуйте локально!
Iskin вне форума Ответить с цитированием
Старый 16.10.2019, 16:01   #15
Elixi
Форумчанин
 
Регистрация: 10.05.2019
Сообщений: 163
По умолчанию

Сергею спасибo!
Cancel = True
вряд-ли бы я дoдумался бы,
и оказывается, что если уже процедура наделена параметром, то вряд-ли он будет лишним

Последний раз редактировалось Elixi; 16.10.2019 в 19:28.
Elixi вне форума Ответить с цитированием
Старый 17.10.2019, 08:09   #16
Iskin
Форумчанин
 
Регистрация: 22.09.2008
Сообщений: 307
По умолчанию

Заметил еще одну замечательность, если нажать выше
Код:
("$V$2")
там где поле пустое, то снимается фильтр и отображается весь список. В общем не плохой код получился, возможно пригодится не только мне.
Думайте глобально - действуйте локально!
Iskin вне форума Ответить с цитированием
Старый 17.10.2019, 09:11   #17
Serge_Bliznykov
Старожил
 
Регистрация: 09.01.2008
Сообщений: 26,238
По умолчанию

Цитата:
Сообщение от Iskin Посмотреть сообщение
Заметил еще одну замечательность, если нажать выше
я думал, что Вы это знаете!

это в алгоритм заложено Elixi - если на пустой ячейке нажмёшь - фильтр снимается.
в его начальном коде можно было в любом месте нажать пустую ячейку кликнуть.
Цитата:
Сообщение от Elixi Посмотреть сообщение
Код:
If Target.Value = "" Then
        ActiveSheet.Range(Cells(2, 1), Cells(Range("$A$2").End(xlDown).Row, 2)).AutoFilter Field:=Target.Column

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


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Перемещение камеры при нажатой левой клавише мыши; проблемы с обзором мыши и видимостью указателя VolodyaBuzin Gamedev - cоздание игр: Unity, OpenGL, DirectX 3 13.09.2019 19:21
Вывести поточные координаты курсора мыши относительно формы и экрана, при нажатии на кнопку реверсивное изменение кнопок мыши C++ carrie bradshaw Помощь студентам 0 06.02.2014 00:21
Как нарисовать квадрат по клику мыши? dekuk C# (си шарп) 3 05.07.2012 15:50
Закрытие окна по клику мыши tumanovalex Qt и кроссплатформенное программирование С/С++ 2 29.05.2011 19:29
TСhart, клик мыши и координаты XY, Определение координат оси при клике мыши Aravild Компоненты Delphi 1 31.01.2009 16:28