Макрос выдает ошибку при скрытии строк

@mmkk · Регистрация: 01.10.2021

Студворк — интернет-сервис помощи студентам

Добрый день!
У меня на листе есть небольшая таблица 6*12 (сверху заголовок), начинается со столбца B. В столбце А напротив соответствующей строчки в зависимости от условия (на предыдущем листе выбирается то, что нужно) появляется либо 0, либо 1. Когда 0, то строку нужно скрыть. Раскрывается все правильно, а скрывается нет. Если скрываются некоторые сроки, например 3 из 5, то все работает хорошо, при попытке выбора 5 строк из 5, появляется ошибка при переходе на лист, где есть макрос, представленный ниже. Ошибка следующая:"Run-time error '1004'. Нельзя установить свойство Hidden класса Range." Как можно сделать так, чтобы в случае всех 0, не было этой ошибки, а просто скрывались все строки кроме заголовка (где нет никакого индикатора (0 либо 1))?
Макрос:

Visual Basic
1
2
3
4
5
6
7
8
9
Private Sub Worksheet_Activate()
For i = 9 To 18
If Sheets("Ввод").Cells(i, 1).Value = "0" Then
Sheets("Ввод").Rows(i).Hidden = True
Else
Sheets("Ввод").Rows(i).Hidden = False
End If
Next
End Sub

Заранее спасибо!
Уже пробовала разные способы, но ошибка не пропадает, не знаю, в чем причина.

@Vlad999 · 28.10.2021, 13:44

Сообщение от mmkk

У меня на листе есть небольшая таблица 6*12 (сверху заголовок)

Лучше прикладывать файл.
и оформляйте код тегом VB

Добавлено через 3 минуты
Просто фильтр не подходит?

@mmkk · 28.10.2021, 22:37 **[ТС]**

Вопрос решила. Спасибо.

@Narimanych · 28.10.2021, 23:52

mmkk,

Сообщение от mmkk

If Sheets("Ввод").Cells(i, 1).Value = "0" Then

Возможно 0 надо без кавычек.

@Hugo121 · 29.10.2021, 15:26

И можно удалить

Visual Basic
1
Sheets("Ввод").

Так уменьшается возможность ошибки, вдруг кто лист переименует.

Новые блоги и статьи Все статьи Все блоги /
SDL3 для Web (WebAssembly): Подключение Box2D v3, физика и отрисовка коллайдеров 8Observer8 12.02.2026 Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами и вызывать обработчики событий столкновения. . . .	SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL_LoadPNG (без SDL3_image) 8Observer8 11.02.2026 Содержание блога Библиотека SDL3 содержит встроенные инструменты для базовой работы с изображениями - без использования библиотеки SDL3_image. Пошагово создадим проект для загрузки изображения. . .	SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL3_image 8Observer8 10.02.2026 Содержание блога Библиотека SDL3_image содержит инструменты для расширенной работы с изображениями. Пошагово создадим проект для загрузки изображения формата PNG с альфа-каналом (с прозрачным. . .	Установка Qt-версии Lazarus IDE в Debian Trixie Xfce volvo 10.02.2026 В общем, достали меня глюки IDE Лазаруса, собранной с использованием набора виджетов Gtk2 (конкретно: если набирать текст в редакторе и вызвать подсказку через Ctrl+Space, то после закрытия окошка. . .
SDL3 для Web (WebAssembly): Работа со звуком через SDL3_mixer 8Observer8 08.02.2026 Содержание блога Пошагово создадим проект для загрузки звукового файла и воспроизведения звука с помощью библиотеки SDL3_mixer. Звук будет воспроизводиться по клику мышки по холсту на Desktop и по. . .	SDL3 для Web (WebAssembly): Основы отладки веб-приложений на SDL3 по USB и Wi-Fi, запущенных в браузере мобильных устройств 8Observer8 07.02.2026 Содержание блога Браузер Chrome имеет средства для отладки мобильных веб-приложений по USB. В этой пошаговой инструкции ограничимся работой с консолью. Вывод в консоль - это часть процесса. . .	SDL3 для Web (WebAssembly): Обработчик клика мыши в браузере ПК и касания экрана в браузере на мобильном устройстве 8Observer8 02.02.2026 Содержание блога Для начала пошагово создадим рабочий пример для подготовки к экспериментам в браузере ПК и в браузере мобильного устройства. Потом напишем обработчик клика мыши и обработчик. . .	Философия технологии iceja 01.02.2026 На мой взгляд у человека в технических проектах остается роль генерального директора. Все остальное нейронки делают уже лучше человека. Они не могут нести предпринимательские риски, не могут. . .

@mmkk 0 / 0 / 0 Регистрация: 01.10.2021 Сообщений: 5
	28.10.2021, 22:37 [ТС]
	Вопрос решила. Спасибо. 0