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

Вход

Регистрация

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

 

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

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Как скрыть столбцы в excel (Формулы/Formulas)
Как скрыть столбцы в excel
ivstepa Дата: Суббота, 29.09.2018, 20:47 | Сообщение № 1
Группа: Пользователи
Ранг: Новичок
Сообщений: 19
Репутация: 6 ±
Замечаний: 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
Группа: Админы
Ранг: Местный житель
Сообщений: 19163
Репутация: 4412 ±
Замечаний: ±

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


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

Автор - Pelena
Дата добавления - 29.09.2018 в 21:06
bmv98rus Дата: Суббота, 29.09.2018, 21:24 | Сообщение № 3
Группа: Друзья
Ранг: Участник клуба
Сообщений: 4099
Репутация: 766 ±
Замечаний: 0% ±

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

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


Замечательный Временно просто медведь , процентов на 20.
 
Ответить
Сообщение
Формулами можно только очистить

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

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

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

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

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

Автор - ivstepa
Дата добавления - 29.09.2018 в 21:41
bmv98rus Дата: Суббота, 29.09.2018, 22:35 | Сообщение № 5
Группа: Друзья
Ранг: Участник клуба
Сообщений: 4099
Репутация: 766 ±
Замечаний: 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]


Замечательный Временно просто медведь , процентов на 20.
 
Ответить
Сообщение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
Группа: Админы
Ранг: Местный житель
Сообщений: 19163
Репутация: 4412 ±
Замечаний: ±

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


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

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

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

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

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