powered by simpleCommunicator - 2.0.59     © 2025 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Скрыть диапазон строк по признаку
20 сообщений из 45, страница 2 из 2
Скрыть диапазон строк по признаку
    #36905729
Ципихович Эндрю
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Tatirus, чтобы повысить узнаваемость надо ник создать из двух слов и желательно русских, проверено работает
...
Рейтинг: 0 / 0
Скрыть диапазон строк по признаку
    #36905741
Tatirus
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Ципихович Эндрю,

А зачем мне узнаваемость? Я несколько раз обращалась на этот форум, нормальное общение, очень помогают! Причем у многих форумчан ник ну никак не из двух русских слов! А я их уже запомнила!
...
Рейтинг: 0 / 0
Скрыть диапазон строк по признаку
    #36905918
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
TatirusА зачем мне узнаваемость?
затем, что по первому посту в этом топике захотелось послать нерадивого студента на..... лекции, куда он не ходил весь семестр, а потом просит, чтобы за него все сделали - пост выглядит именно так.
И только увидев, что мы с вами уже успешно общались, решил пообщаться еще... а мог бы и полоснуть (с).... не пообщаться
...
Рейтинг: 0 / 0
Скрыть диапазон строк по признаку
    #36906144
Tatirus
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Shocker.Pro[quot Tatirus] нерадивого студента на..... лекции, куда он не ходил весь семестр, а потом просит, чтобы за него все сделали

Спасибо всем, кто помог нерадивому студенту! На самом деле помогли. Хотя, видимо, задачка была для первой группы детского сада ))
...
Рейтинг: 0 / 0
Скрыть диапазон строк по признаку
    #36906621
Deggasad
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
TatirusShocker.Pro[quot Tatirus] нерадивого студента на..... лекции, куда он не ходил весь семестр, а потом просит, чтобы за него все сделали

Спасибо всем, кто помог нерадивому студенту! На самом деле помогли. Хотя, видимо, задачка была для первой группы детского сада ))

Да вы не переживайте так, все учились понемногу.
Чтобы Вам не было так обидно, скажу что вашим учителям есть еще чему поучиться :)
Например ваш код скорее всего можно свести к одной строке:
Код: plaintext
  Range("диапазон2").EntireRow.Hidden = (Range("признак2") =  0 )
И если критерий меняется не по формуле а ручками, то макрос нужно вешать не на событие Calculate, а на Change
Код: plaintext
1.
2.
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = Range("признак2").Address Then Call Hidden
End Sub
...
Рейтинг: 0 / 0
Скрыть диапазон строк по признаку
    #36909146
Tatirus
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Столкнулась с такой проблемой. Макрос, который скрывает диапазоны на двух листах - Sub Hidden(), написанный в отдельном файле Excel, работате прекрасно, без задумчивости.

Когда я вставляю данный макрос в модель Excel (файл с расчетами, другими макросами), он начинает тормозить: минут 10 думает и необходимых действий не выполняет.

При этом, если убрать вызов макроса Hidden - Private Sub Worksheet_Calculate(), и запустить макрос Hidden вручную (через Сервис - Макрос - Макросы - Выполнить), то Hidden прекрасно работает!

С чем это может быть связано? Если я понятно объяснила :))
...
Рейтинг: 0 / 0
Скрыть диапазон строк по признаку
    #36909168
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Вам же посоветовали перевесить это на Change с небольшой добавкой. Вы это сделали?
...
Рейтинг: 0 / 0
Скрыть диапазон строк по признаку
    #36909175
Tatirus
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Shocker.ProВам же посоветовали перевесить это на Change с небольшой добавкой. Вы это сделали?

У меня критерий меняется по формуле, а не ручками
...
Рейтинг: 0 / 0
Скрыть диапазон строк по признаку
    #36909310
Deggasad
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
TatirusShocker.ProВам же посоветовали перевесить это на Change с небольшой добавкой. Вы это сделали?

У меня критерий меняется по формуле, а не ручками

Но что-то же меняется ручками?
...
Рейтинг: 0 / 0
Скрыть диапазон строк по признаку
    #36909313
Deggasad
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
:) пример в студию
...
Рейтинг: 0 / 0
Скрыть диапазон строк по признаку
    #36909381
Tatirus
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Deggasad:) пример в студию

Не получается, почему-то, приложить файл :((
Без примера, наверное, сложно обсуждать проблему. Попробую попозже выложить пример.
...
Рейтинг: 0 / 0
Скрыть диапазон строк по признаку
    #36909405
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Tatirus,

Почему - написано наверху страницы.
Положите на любой хостинг и дайте ссылку
...
Рейтинг: 0 / 0
Скрыть диапазон строк по признаку
    #36909409
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Tatirus,

Почему - написано наверху страницы.
Положите на любой хостинг и дайте ссылку
...
Рейтинг: 0 / 0
Скрыть диапазон строк по признаку
    #36909443
Deggasad
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
А если так?

Код: plaintext
1.
2.
3.
4.
5.
6.
Private Sub Worksheet_Calculate()
Static x
If IsEmpty(x) Or x <> Range("признак2") Then
 Call Hidden
 x = Range("признак2")
End If
End Sub
...
Рейтинг: 0 / 0
Скрыть диапазон строк по признаку
    #36909445
Deggasad
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: plaintext
1.
2.
3.
4.
5.
6.
Private Sub Worksheet_Calculate()
Static x
If IsEmpty(x) Or x <> Range("признак2") Then
 Call Hidden
 x = Range("признак2")
End If
End Sub
Так тупит?
...
Рейтинг: 0 / 0
Скрыть диапазон строк по признаку
    #36909500
Tatirus
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Deggasad
Код: plaintext
1.
2.
3.
4.
5.
6.
Private Sub Worksheet_Calculate()
Static x
If IsEmpty(x) Or x <> Range("признак2") Then
 Call Hidden
 x = Range("признак2")
End If
End Sub
Так тупит?

Да
...
Рейтинг: 0 / 0
Скрыть диапазон строк по признаку
    #36909506
Tatirus
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Shocker.ProTatirus,

Почему - написано наверху страницы.
Положите на любой хостинг и дайте ссылку

Скрыть диапазон 4.xls
...
Рейтинг: 0 / 0
Скрыть диапазон строк по признаку
    #36909951
Deggasad
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Не понятно так, нужен пример, в котором тупит.
...
Рейтинг: 0 / 0
Скрыть диапазон строк по признаку
    #36910060
Tatirus
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Еще обратила внимание на то, что макрос Hidden вызывается, если выполняется макрос, который ссылается на лист, в модуле которого прописан вызов макрос Hidden...
...
Рейтинг: 0 / 0
Скрыть диапазон строк по признаку
    #36910745
Deggasad
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
TatirusЕще обратила внимание на то, что макрос Hidden вызывается, если выполняется макрос, который ссылается на лист, в модуле которого прописан вызов макрос Hidden...
пример со всем описанным прикладывайте.
...
Рейтинг: 0 / 0
20 сообщений из 45, страница 2 из 2
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Скрыть диапазон строк по признаку
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]