макрос по скрытию столбцов

Дата публикации: 09-10-2026 08:47:13

макрос по скрытию столбцов макрос по скрытию столбцов в форуме Вопросы по Microsoft Excel.
====code====
Sub Hide()
    Const LastCol = 25
    Const LastRow = 459
    Dim i As Long
    
    Application.ScreenUpdating = False                                           'отключаем обновление экрана для ускорения
    
    For i = 1 To LastCol
        If ActiveSheet.Cells(LastRow, i).Valuo = "" Or ActiveSheet.Cells(LastRow, i).Valuo = 0 Then ActiveSheet.Columns(i).Hidden = True
    Next i
    Application.ScreenUpdating = True
End Sub
=============
Здравствуйте!Почему не работает макрос ?
09.10.2026 11:47:13, Светлана Клешнева.

Основное содержимое страницы с новостью.

Схожие новости

#	Наименование новости	Тональность	Информативность	Дата публикации
1	Заливка цветов с помощью макроса	0	8.29	12-10-2026
2	Подсветка рабочей строки	0	12.74	30-09-2026
3	Скопировать определенное количество отфильтрованных ячеек	0	11.46	07-10-2026
4	Удаление листов по кнопке	0	10.37	13-10-2026
5	Расчет количества дней, срок отклонения рассмотрения	0	5.99	12-10-2026
6	Макрос для создания данных на нужном листе	0	6.6	01-10-2026
7	Как заблокировать ячейку для ввода если флажок не выбран	0	8.64	04-10-2026
8	Сгруппировать таблицы одну под одной автоматечески из разных листов	0	4.58	02-10-2026
9	что не так с файлом?	0	4.92	02-10-2026
10	Сброс счётчиков нажатий на картинку по достижении определённых значений.	0	6.71	11-10-2026

Классификация: . Схожих патентов: 0. Схожих новостей: 10. Тональность: 0. Информативность: 10.84. Источник: www.planetaexcel.ru.