Форум
Написать нам
Страница 1 из 11
Форум MMB » Другие разделы » Мир программирования » VBA. Скрыть столбец.
VBA. Скрыть столбец.
SergДата: Вторник, 17 Январь 2017, 18:17 | Сообщение # 1
Ветеран форума
Группа: Проверенные
Сообщений: 957
Репутация: 6
Награды: 8
Статус: Offline
Привет всем. Есть у нас знатоки VBA?

Sub Hide()
Dim cell As Range
Application.ScreenUpdating = False 'отключаем обновление экрана для ускорения
For Each cell In ActiveSheet.UsedRange.Rows(1).Cells'проходим по всем ячейкам первой строки
If cell.Value = "7" Then cell.EntireColumn.Hidden = 1 'а здесь мне нужно чтобы скрывался не текущий столбец, а следующий
Next

Application.ScreenUpdating = True
End Sub


 
Форум MMB » Другие разделы » Мир программирования » VBA. Скрыть столбец.
Страница 1 из 11
Поиск: