Форум
Написать нам
  • Страница 1 из 1
  • 1
Форум 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 из 1
  • 1
Поиск: