Скрыть колонки в Excel

[348tom]

Кто подскажет как автоматически(макрос или скрипт) скрывать колонки в таблице Excel только те которые имеют в определенной строке нулевые значения

[Jmd]

попробуй записать макрос. Главная трудность будет - критерии отбора колонок, чтобы Excel понял.

для определения ненужных колонок можно попробовать использовать "условное форматирование", а так - не сталкивался за ненадобностью, не могу сказать точнее.

[348tom]

Получается что каждый раз бывают разные колонки.

Выглядет это так: примерно 150 отображенных колонок; в определеные строки разных колонок заносятся данные(цифры) примерно 15-30 колонок, остальные пустые, но они могут находиться не попорядку, их необходимо скрыть и распечатать.

А есть еще таблица с кучей строк (порядка 500) и тоже заполняется только часть (10-15), а остальные необходимо срывать.

[Sandrik]

Получается что каждый раз бывают разные колонки.

Выглядет это так: примерно 150 отображенных колонок; в определеные строки разных колонок заносятся данные(цифры) примерно 15-30 колонок, остальные пустые, но они могут находиться не попорядку, их необходимо скрыть и распечатать.

А есть еще таблица с кучей строк (порядка 500) и тоже заполняется только часть (10-15), а остальные необходимо срывать.

Попробуй так:

Sub xxx()

Dim rinda As Integer

Dim no, lidz As Integer

Dim i As Integer

rinda = Worksheets("dati").Cells(2, 3).Value

If rinda <> 0 Then

no = Worksheets("dati").Cells(3, 3).Value

lidz = Worksheets("dati").Cells(3, 3).Value

If no <= lidz Then

For i = no To lidz

If (Cells(rinda, i).Value = "") Or (Cells(rinda, i) = 0) Then

Columns(i).Hidden = True

End If

Next i

End If

End If

MsgBox rinda

End Sub

Данные (в какой строке искать пустые и с какой по какую колонти скрывать) берутся из листа "Dati":

rinda - в какой строке искать пустые

no - с какой колонки скрывать

lidz - по какую колонку проверять

[348tom]

Sandrik

Спасибо за ответ.

Наконец-то получил что-то. Хотя у меня ничего не получается как это применить практически.

Может я Вам небольшую табличку сброшу на мыло а Вы укажите на ней конкретно что и как?

С уважением Том.