Автоматически скрывать строки на листе по условию ?

[rsa_don]

Добрый день !
Есть Лист1 ,как бланк заказа на 15 строк(макс.количество наименований),но на практике заполняют в среднем 5-8.Как сделать ,так чтобы
при полном заполнении первой строки из скрытого диапазона строк появлялась вторая и т.д. и наоборот- при удалении -скрывалась ,как на экране,так и при печати ?
(Неприменное условие лист должен быть защищен)
Спасибо.

[rsa_don]

Добрый День !
Не дождался ответа на вопрос, решил частично ,может кому пригодится:
Показать\Скрыть диапазон строк защищенного листа(пароль : 1) при помощи элемента управления .
Пример вложен.
Вопрос : Как заставить работать макрос при условии ,например -ячейка $АА25=0 ?
Cпасибо.

[Hasim]

при полном заполнении первой строки из скрытого диапазона строк

Как определить, что эта строка заполнена и пора переходить к следующей?

[rsa_don]

Как определить, что эта строка заполнена и пора переходить к следующей?

Ну не вся строка,а хотя бы по суммирующей ячейке(в примере - $АА25) .Как ?

[Hasim]

А как определить, что эта строка является последней и больше ничего заполнять не надо?

[rami]

Не дождался ответа на вопрос

A я думал, не дождусь подробностей вопроса. Без примера я бы не стал изобретать 100500 вариантов, потом окажется, что ни один не подходит.

Есть Лист1 ,как бланк заказа на 15 строк(макс.количество наименований),но на практике заполняют в среднем 5-8.Как сделать ,так чтобы
при полном заполнении первой строки из скрытого диапазона строк появлялась вторая и т.д. и наоборот- при удалении -скрывалась ,как на экране,так и при печати ?
(Неприменное условие лист должен быть защищен)

Пароль: 1. Проверяйте.

[Hasim]

Проверяйте

Внизу всегда болтается пустая строка. Это нехорошо.
"Стереть данные" - лишняя ненужная кнопка.

[rsa_don]

Спасибо огромное Rami !
Все работает.

[rsa_don]

Rami !
Добрый День!
Вопрос ! Если существуют в документе несколько на разных листах NameRange макрос работает только на одном! Что необходимо изменить?
(пример и скрин прикреплен, пароль: 1)
Спасибо.

[rami]

Что необходимо изменить?

Проблема была строке:

Код Выделить Развернуть

NRg=ThisComponent.NamedRanges.getByName("сум").ReferredCellsКогда был один именованный диапазон работало, а когда несколько нужно вызывать по имени через метод getByName("сум"). Исправил кое-что ещё по мелочам.

[rsa_don]

Спасибо.Буду проверять уже завтра.Еще раз спасибо,Rami!