Получить номер строки на листе (печатном)

Автор Netlog, 2 февраля 2017, 20:19

0 Пользователи и 1 гость просматривают эту тему.

Netlog

Надо в нижней строке таблицы печатать подпись на каждом печатном листе. Строки разной высоты, форматирование меняется, в колонтитул подпись вставить не годится.
Как?

kompilainenn

Цитата: Netlog от  2 февраля 2017, 18:19в колонтитул подпись вставить не годится.
почему? или у Вас на каждой странице РАЗНЫЕ подписи?
Поддержать разработчиков LibreOffice можно тут, а наш форум вот тут

JohnSUN

Владислав Орлов aka JohnSUN
Благодарить-не зазорно.
Подарить благо создателям офиса, нашему ресурсу, мне

Netlog

Цитата: JohnSUN от  2 февраля 2017, 18:51почему? или у Вас на каждой странице РАЗНЫЕ подписи?
подписи одинаковые. В колонтитуле привязка к странице, нижняя строка всё время на разной высоте. Подпись мимо строки.
Цитата: JohnSUN от  2 февраля 2017, 18:51Ну, наверное, как-то так, нет?
Это сейчас так, что разметку страницы глянул, потягал где надо строчки вверх-вниз, и давай вручную в нижнюю стрроку вставлять подпись. как на первой странице документа что-то меняем - всё уплывает.

mikekaganski

Вы почему-то пытаетесь привязать подпись к ячейке листа.

Не проще ли сделать целиком изображение того, что Вам надо, с подписью, печатью, линией, ФИО, танцами и бубнами, отвязанным от таблицы и помещённым (например, в виде изображения, или как удобно), в колонтитул?
С уважением,
Михаил Каганский

Netlog

Всю таблицу запихнуть в нижний колонтитул? Новый на каждом листе? Нет смысла, число строк переменное, проще уж в режиме разметки страницы пробежать и вручную и Ctrl+V в нижней строке каждого листа.

economist

Или написать макрос, который пробежит весь диапазон и в по опр. признакам вставит PageBreak.


Option VBASupport 1
Option Compatible

sub pagebreak
Dim Sheet As Object
Dim Cell As Object  
Sheet = ThisComponent.Sheets(0)

for i = 10 to 1000
if Cells(i,1).Value="Директор"  then  
Sheet.Rows(i).IsStartOfNewPage = true
next i

end sub



Это смесь VBA и StarBasic. VBA намного более лаконичен, объектная модель и свойства в нём внутри LibreOffice доступны с такой же скоростью, как и в StarBasic.
Руб. за сто, что Питоньяк
Любит водку и коньяк!
Потому что мне, без оных, -
Не понять его никак...

economist

Netlog - вообще-то из чувства прекрасненького - именно колонтитулы призваны обеспечить приятное расположение подписей на одном уровне от нижнего края страницы. Так что товарищи вам дело советовали.
Руб. за сто, что Питоньяк
Любит водку и коньяк!
Потому что мне, без оных, -
Не понять его никак...

Netlog

Цитата: economist от  3 февраля 2017, 06:19Или написать макрос, который пробежит весь диапазон и в по опр. признакам вставит PageBreak.
Это интересно!
PageBreak вставлять самому по накоплению достаточного количества строк, точнее, занятого ими места. И в ячейку текст "Директор такой то"
Можно и так. Но исходно о другом думал - разрывы страниц уже есть, надо к ним прилепить подписи.

Netlog

Цитата: Netlog от  3 февраля 2017, 09:25Netlog - вообще-то из чувства прекрасненького - именно колонтитулы призваны обеспечить приятное расположение подписей на одном уровне от нижнего края страницы. Так что товарищи вам дело советовали.
Таблица поджата верх. Высота строк переменная. Строк разное количество на листе. Нижний край нижней строки от колонтитула на произвольном расстоянии. Подпись в нижней строке таблицы. Колонтитулы не при деле. Нижние. Да и верхние тоже :)

kompilainenn

Цитата: Netlog от  3 февраля 2017, 09:28Подпись в нижней строке таблицы.
почему подпись именно в самой таблице должна быть?
Поддержать разработчиков LibreOffice можно тут, а наш форум вот тут

JohnSUN

Цитата: kompilainenn от  3 февраля 2017, 13:32
Цитата: Netlog от  3 февраля 2017, 09:28Подпись в нижней строке таблицы.
почему подпись именно в самой таблице должна быть?
...а не, скажем, заранее впечатана в чистые листы для распечатывания таблицы поверху?  ;D
Владислав Орлов aka JohnSUN
Благодарить-не зазорно.
Подарить благо создателям офиса, нашему ресурсу, мне

kompilainenn

Цитата: JohnSUN от  3 февраля 2017, 15:25...а не, скажем, заранее впечатана в чистые листы для распечатывания таблицы поверху?
а это тоже хороший вариант
Поддержать разработчиков LibreOffice можно тут, а наш форум вот тут

Netlog

Цитата: kompilainenn от  3 февраля 2017, 11:32почему подпись именно в самой таблице должна быть?
Пёс его знает... Так наши деды печатали :)
Там на самом деле то в каждой строке подписываться положено, но строк много, и, с трудом, удалось уговорить публику подписывать один раз на всём листе. Но в таблице, объединив строки.

kompilainenn

Поддержать разработчиков LibreOffice можно тут, а наш форум вот тут