Гость
Войти | Профиль | Очистить
Действия ...
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Как автоматически скрывать/удалять столбцы/строки / 11 сообщений из 11, страница 1 из 1
18.11.2014, 17:16
    #38809891
MDesh
MDesh
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как автоматически скрывать/удалять столбцы/строки
Можно ли настроить экселевскую таблицу таким образом, чтобы она при открытии автоматически скрывала или удаляла столбцы и строки если, например, в этом столбце/сроке в одной из ячеек прописано значение "скрыть"?
Если нельзя это сделать автоматически при открытии, то можно ли это сделать в одно нажатие какой-нибудь кнопки уже после открытия файла?
Заранее спасибо!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
18.11.2014, 17:36
    #38809920
Akina
Akina
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как автоматически скрывать/удалять столбцы/строки
Да, можно, причём и так, и так.
В любом случае потребуется написАть макрос, который выполняет такое сокрытие, и "навесить" его на событие открытия книги или нажатия кнопки.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
19.11.2014, 11:03
    #38810457
MDesh
MDesh
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как автоматически скрывать/удалять столбцы/строки
Akina,

Это очень хорошая новость! Тогда меня интересует макрос, который будет скрывать/удалять строки и столбцы при открытии файла.
К сожалению, с макросами я еще не работал и, боюсь, что с первого раза такой макрос я не напишу. А если напишу, то это займет очень много времени. Я более чем уверен, что такая проблема уже поднималась и не раз, но пока что найти его у меня не получилось =(
Не поможете?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
19.11.2014, 13:02
    #38810664
Akina
Akina
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как автоматически скрывать/удалять столбцы/строки
Используйте макрорекордер.
Включите запись. Выполните нужное действие. Остановите запись. Изучите полученный код макроса.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
19.11.2014, 15:24
    #38810871
MDesh
MDesh
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как автоматически скрывать/удалять столбцы/строки
Akina,

Запись маросов не учитывает нахождение в конкретной ячейке значения "скрыть" и не учитывает то, что выполнить его нужно при открытии файла =(
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
19.11.2014, 16:22
    #38810937
Akina
Akina
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как автоматически скрывать/удалять столбцы/строки
Понятно, что полученный код - всего лишь образец. А всё остальное придётся пририсовать ручками. Поиск по контенту. Получение адреса найденной ячейки. Скрытие. Повторение, пока что-то находится...

Да, если есть желание получить сразу готовый к употреблению код - то см. Пособие для студентов и школьников .
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
19.11.2014, 17:40
    #38811043
Shocker.Pro
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как автоматически скрывать/удалять столбцы/строки
Вот пример, почти тупо скопированный из справки

Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
Private Sub Workbook_Open()

With Worksheets(1).Range("a1:z500")
    Set c = .Find("скрыть", LookIn:=xlValues)
    If Not c Is Nothing Then
        firstAddress = c.Address
        Do
            c.EntireColumn.Hidden = True
            Set c = .FindNext(c)
            If c Is Nothing Then Exit Do
        Loop While c.Address <> firstAddress
    End If
End With

End Sub
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
19.11.2014, 18:59
    #38811128
MDesh
MDesh
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как автоматически скрывать/удалять столбцы/строки
Shocker.Pro,

этот макрос работает при открытии файла?
Он скрывает столбцы при наличии в нем значения "скрыть"?
Или строки?
Или и то и другое?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
19.11.2014, 19:21
    #38811151
Shocker.Pro
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как автоматически скрывать/удалять столбцы/строки
MDeshэтот макрос работает при открытии файла?Да, если его разместить в модуле книги
MDeshИли строки?Столбцы:
Код: vbnet
1.
c.EntireColumn.Hidden = True

для строк можно добавить еще строку по аналогии
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
20.11.2014, 10:31
    #38811532
MDesh
MDesh
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как автоматически скрывать/удалять столбцы/строки
Shocker.Pro,

я попытался добавить его в свою книгу, запустил, все сработало, сохранил и закрыл. Но он почему то не сохранился и не запускается вновь при дальнейшем открытии файла. Может быть я его неправильно добавляю? Не поможете добавить его? Вот самый банальный пример такой книги.
ЗЫ: если добавите еще и сокрытие строк - буду очень вам признателен!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
20.11.2014, 11:27
    #38811609
Shocker.Pro
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как автоматически скрывать/удалять столбцы/строки
Может быть и неправильно, может быть и не в ту книгу, но в приложенной книге макроса нет. Проверьте, в какую книгу вы его добавляете и настройки безопасности в экселе.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Как автоматически скрывать/удалять столбцы/строки / 11 сообщений из 11, страница 1 из 1
Целевая тема:
Создать новую тему:
Автор:
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
созд. / загр.: 434ms
Закрыть
start [/forum/topic.php?fid=61&mobile=1&tid=2173744]:
 0ms
get settings:
 10ms
get forum list:
 13ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 39ms
get topic data:
 13ms
get forum data:
 2ms
get page messages:
 53ms
get tp. blocked users:
 2ms
others: 294ms
total:  434ms
x
x
Закрыть


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