Страницы: 1
RSS
Как создать счетчик количества выводимых на печать страниц Листа 2 на Листе 1??
 
Уважаемые форумчане, приветствую!!
Подскажите, пожалуйста, как решить следующую задачу:
В ячейке на Листе 1 необходимо указать сумму печатных страниц Листа 2, которые (страницы) постоянно меняются в зависимости от объема данных..
Очень рассчитываю на решение без активации макросов..
Заранее благодарю за помощь!!
С уважением,  Валентин
 
В ячейку "В6"
Код
=ОКРУГЛ(МАКС(Лист2!A:A)/52;0)
Удивление есть начало познания © Surprise me!
И да пребудет с нами сила ВПР.
 
Ёк-Мок, спасибо за ответ!! Но данная формула работает только с с имеющимися двумя страницами, что если страниц будет более двух??
С уважением,  Валентин
 
А Вы попробуйте
Изменено: Ёк-Мок - 10.10.2013 13:54:51 (): Нет, не работает)
Удивление есть начало познания © Surprise me!
И да пребудет с нами сила ВПР.
 
Очень пробую, но двойка в B6 статична.. Может быть упускаю что-то??
С уважением,  Валентин
 
Цитата
выводимых на печать страниц Листа 2
Все ли страницы Листа2 будут выводиться на печать?
Страниц может быть 10, а на печать надо выводить с 3 по 7.
 
Kuzmich, еще раз приветствую!!
Да, на печать должны будут выведены все страницы листа (чаще всего их не более семи)..
С уважением,  Валентин
 
Тогда так
Удивление есть начало познания © Surprise me!
И да пребудет с нами сила ВПР.
 
Так получается, что система видит и считает только исходя из наличия таблицы: если добавить листы, кол-во в B6 остается равным 4, даже если в конце пятого листа будет запись.. Если сократить область печати без удаления таблицы - остается 4 в B6.. Изменения наблюдаются только при изменении кол-ва строк таблицы..

Файл, в котором будет применяться данный вариант будет скорее всего содержать на последней странице будет конец таблицы, внизу страницы место для подписи и печати и исполнитель..
С уважением,  Валентин
 
офф
а ещё в ячейку "С6" листа 1 вставьте формулу:
Код
=ЕСЛИ(B6=11;"листах";ЕСЛИ(ПРАВСИМВ(B6;1)="1";"листе";"листах"))
Удивление есть начало познания © Surprise me!
И да пребудет с нами сила ВПР.
 
Цитата
Файл, в котором будет применяться данный вариант будет скорее всего содержать на последней странице будет конец таблицы, внизу страницы место для подписи и печати и исполнитель..
Так этого в посте #1 не было ):
Удивление есть начало познания © Surprise me!
И да пребудет с нами сила ВПР.
 
За прием с C6 спасибо!! Очень доволен!!

Да, приношу извинения, все никак не могу охватить все в вопросе и приложить шаблон документа с более нормальным видом, но скоро попробую..
Изменено: vdolgov - 10.10.2013 13:59:50
С уважением,  Валентин
 
Обновил!!
С уважением,  Валентин
 
Код
=ЕСЛИ((СЧЁТЗ(Лист2!A:A)+32)/52=ЦЕЛОЕ((СЧЁТЗ(Лист2!A:A)+32)/52);(СЧЁТЗ(Лист2!A:A)+32)/52;ЦЕЛОЕ((СЧЁТЗ(Лист2!A:A)+32)/52)+1)


Важно!
1. Количество пустых ячеек столбца "А" листа 2 (между ячейкой "А1" и ячейкой с текстом "тел.") не должно меняться - сейчас таких ячеек 32 шт.
2. Масштаб вывода на печать тоже не должен меняться - сейчас на одну страницу выводятся 52 строки
Изменено: Ёк-Мок - 10.10.2013 15:43:46
Удивление есть начало познания © Surprise me!
И да пребудет с нами сила ВПР.
 
Спасибо!! Буду изучать, пробовать, подгонять!!
Дело в том, что ячейки "Исп" и "Тел" должны быть всегда в конце листа.. В колонтитулы их поместить не могу, так как содержимое их будет меняться в зависимости от автора письма..
С уважением,  Валентин
 
Цитата
Буду изучать
Изучать надо VBA.
Там практически одной строчкой можно получить количество страниц на листе
n = ActiveSheet.HPageBreaks.Count
 
Полностью согласен.. Видимо подсознательные страхи перед непонятным у меня..
Но на данном примере, возможно, и начну с собой и этими листами бороться!!
Буду искать - с чего начать и как вписать..
Спасибо за строку!!
С уважением,  Валентин
 
Если можете выложить файл в формате .xls (у меня Excel 2003), то я посмотрю,
что можно сделать
 
В xls..
С уважением,  Валентин
 
Посмотрите, как-то так
 
Спасибо!! Посмотрю!! Будут вопросы - напишу..

Хорошего вечера!!
С уважением,  Валентин
Страницы: 1
Читают тему
Наверх