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

Вход

Регистрация

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

 

= Мир MS Excel/Как скрыть столбцы в excel - Мир MS Excel

Регистрация · Логин: · Пароль: · · Забыли пароль?
  • Страница 1 из 1
  • 1
Модератор форума: _Boroda_, Manyasha, SLAVICK, китин  
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Как скрыть столбцы в excel (Формулы/Formulas)
Как скрыть столбцы в excel
ivstepa Дата: Суббота, 29.09.2018, 20:47 | Сообщение № 1
Группа: Пользователи
Ранг: Прохожий
Сообщений: 3
Репутация: 0 ±
Замечаний: 0% ±

Excel 2016
Есть табель учета рабочего времени. Как сделать в нем так чтобы если в месяце 30 дней, то пустой столбце для 31 числа скрывался. А если 31 день в месяце, то он назад отображался
Мне надо так как показано на рисунке, 1 когда в месяце 31 день, 2 в месяце , например 28 дней, и у нас остаются пустые столбцы, что не очень красиво смотрится. Как сделать как показано 3, т. е. пустые столбцы скрывались или удалялись, если 28 дней или 30, а потом появлялись если 31 день.
К сообщению приложен файл: ____.xlsx(88.5 Kb)


Сообщение отредактировал ivstepa - Суббота, 29.09.2018, 21:36
 
Ответить
СообщениеЕсть табель учета рабочего времени. Как сделать в нем так чтобы если в месяце 30 дней, то пустой столбце для 31 числа скрывался. А если 31 день в месяце, то он назад отображался
Мне надо так как показано на рисунке, 1 когда в месяце 31 день, 2 в месяце , например 28 дней, и у нас остаются пустые столбцы, что не очень красиво смотрится. Как сделать как показано 3, т. е. пустые столбцы скрывались или удалялись, если 28 дней или 30, а потом появлялись если 31 день.

Автор - ivstepa
Дата добавления - 29.09.2018 в 20:47
Pelena Дата: Суббота, 29.09.2018, 21:06 | Сообщение № 2
Группа: Админы
Ранг: Местный житель
Сообщений: 13113
Репутация: 2889 ±
Замечаний: ±

Excel 2010, 2016 & Mac Excel
Не открывается архив. Пишет - поврежден.
Если именно скрывать, то макросом. Формулами можно только очистить


"Черт возьми, Холмс! Но как??!!"
ЯД 41001765434816
 
Ответить
СообщениеНе открывается архив. Пишет - поврежден.
Если именно скрывать, то макросом. Формулами можно только очистить

Автор - Pelena
Дата добавления - 29.09.2018 в 21:06
bmv98rus Дата: Суббота, 29.09.2018, 21:24 | Сообщение № 3
Группа: Проверенные
Ранг: Старожил
Сообщений: 1302
Репутация: 220 ±
Замечаний: 0% ±

Excel 2013/2016
Формулами можно только очистить

Pelena, :-) Очистить ли? :-)
 
Ответить
Сообщение
Формулами можно только очистить

Pelena, :-) Очистить ли? :-)

Автор - bmv98rus
Дата добавления - 29.09.2018 в 21:24
ivstepa Дата: Суббота, 29.09.2018, 21:41 | Сообщение № 4
Группа: Пользователи
Ранг: Прохожий
Сообщений: 3
Репутация: 0 ±
Замечаний: 0% ±

Excel 2016
Если именно скрывать, то макросом. Формулами можно только очистить

Вот именно что нужно скрывать.
С макросами у меня туговато.
Если можно пример.
К сообщению приложен файл: abel_.xlsx(88.5 Kb)
 
Ответить
Сообщение
Если именно скрывать, то макросом. Формулами можно только очистить

Вот именно что нужно скрывать.
С макросами у меня туговато.
Если можно пример.

Автор - ivstepa
Дата добавления - 29.09.2018 в 21:41
bmv98rus Дата: Суббота, 29.09.2018, 22:35 | Сообщение № 5
Группа: Проверенные
Ранг: Старожил
Сообщений: 1302
Репутация: 220 ±
Замечаний: 0% ±

Excel 2013/2016
ivstepa, У вас там очень много нужно подправить, для упрощения. например
номер месяца
Код
=MONTH("1 " & R4)

с числами тоже намудрили, н оне суть. В таком виде как сейчас не удается по простому отловить событие смены года,
Сам макрос не сложный, например так.

[vba]
Код
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$D$2" Or Target.Address = "$R$4" Then
    For Each MCell In Range("AG6:AI6")
        If MCell <> "" Then
            Columns(MCell.Column).EntireColumn.Hidden = False
        Else
            Columns(MCell.Column).EntireColumn.Hidden = True
        End If
    Next
End If
End Sub
[/vba]
 
Ответить
Сообщениеivstepa, У вас там очень много нужно подправить, для упрощения. например
номер месяца
Код
=MONTH("1 " & R4)

с числами тоже намудрили, н оне суть. В таком виде как сейчас не удается по простому отловить событие смены года,
Сам макрос не сложный, например так.

[vba]
Код
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$D$2" Or Target.Address = "$R$4" Then
    For Each MCell In Range("AG6:AI6")
        If MCell <> "" Then
            Columns(MCell.Column).EntireColumn.Hidden = False
        Else
            Columns(MCell.Column).EntireColumn.Hidden = True
        End If
    Next
End If
End Sub
[/vba]

Автор - bmv98rus
Дата добавления - 29.09.2018 в 22:35
Pelena Дата: Воскресенье, 30.09.2018, 09:32 | Сообщение № 6
Группа: Админы
Ранг: Местный житель
Сообщений: 13113
Репутация: 2889 ±
Замечаний: ±

Excel 2010, 2016 & Mac Excel
Очистить ли?
Так и знала, что кто-нибудь прицепится :D
Ну, лень было писать "визуально сделать ячейки пустыми"


"Черт возьми, Холмс! Но как??!!"
ЯД 41001765434816
 
Ответить
Сообщение
Очистить ли?
Так и знала, что кто-нибудь прицепится :D
Ну, лень было писать "визуально сделать ячейки пустыми"

Автор - Pelena
Дата добавления - 30.09.2018 в 09:32
ivstepa Дата: Воскресенье, 30.09.2018, 15:03 | Сообщение № 7
Группа: Пользователи
Ранг: Прохожий
Сообщений: 3
Репутация: 0 ±
Замечаний: 0% ±

Excel 2016
bmv98rus, Спасибо большое, то что надо. hands
 
Ответить
Сообщениеbmv98rus, Спасибо большое, то что надо. hands

Автор - ivstepa
Дата добавления - 30.09.2018 в 15:03
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Как скрыть столбцы в excel (Формулы/Formulas)
  • Страница 1 из 1
  • 1
Поиск:

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