Печать суммы на каждой странице (excel)

[taplica]

Есть таблица в excel. Нужно, чтоб определенные данные печатались на каждой станице. Если с шапкой все понятно: с помощью параметры печати/лист/сквозных строк, то как быть в итоговой суммой столбца для каждой страницы?? Посоветуйте, как такое можно реализовать? Любые идеи.

[Wolodya]

Access не поможет?

[taplica]

Access не поможет?

Нее, мне не нравится в каком виде он отчеты делает. В екселе как-то аккуратнее получается.

[ADSemenov.ru]

В Excel можно сделать всё, но недостаточно подробно освещена задача.

[Dracosha Andrew]

В колонтитулы никак не получилось...

[Пытливый]

Есть таблица в excel. Нужно, чтоб определенные данные печатались на каждой станице. Если с шапкой все понятно: с помощью параметры печати/лист/сквозных строк, то как быть в итоговой суммой столбца для каждой страницы?? Посоветуйте, как такое можно реализовать? Любые идеи.

Можно попробовать так (скорее всего, это будет правой рукой левое ухо, но, тем не менее):
1. определяем, сколько строк из таблицы влезает на одну страницу
2. рисуем макрос, который через каждое это самое количество строк вставляет соответствующую суммирующую строку и рисует в ней формулы.

Еще можно так:
1. добавляем в таблицу еще один столбец и называем его, допустим "Код"
2. в этом столбце для всех строк, которые печатаются на одной странице ставим одно значение кода (например "100"), для тех, что на второй странице - другой код (например "101")
3. Сортируем по этому коду таблицу
4. п.меню Данные (Data) - > промежуточные итоги
5. по каждому коду подводим промежуточные итоги.

Неудобство будет в том, что при изменении количества строк в таблице надо будет перелопатить все коды. Кстати, после перелопачивания этот столбец можно вообще скрыть.

В принципе, этот алгоритм можно программно сделать - будем задавать количество строк на страницу, а дальше все будет само... %О)
Болше ничегошеньки в голову не идет.

[Dracosha Andrew]

Пытливый, Если можно сделать програмно - напишите как, народ будет благодарен.

[ADSemenov.ru]

Напечатать в нижнем (или в любом) колонтитуле каждой страницы одного листа значение какой-либо ячейки - одна строка макроса прицепленная к событию.

Напечатать в колонтитуле каждой страницы что-то из этой же страницы немного сложней.

Так что же надо-то? Задача недостаточно чётко поставлена...

[Пытливый]

Вот. Набросал на скору руку. Пояснения на листе и в теле макроса.
Успехов! :О)

[ADSemenov.ru]

Код впечатляет, а результат - полная ахинея!

Эй! А кто задачу поставит корректно и понятно?

[Dracosha Andrew]

ADSemenov.ru, насколькоя понял дело обстоит так.
Для ряда денежных документов требуется сумма по странице.
Именно это в Excell'е и пытается получить taplica,

[ADSemenov.ru]

Dracosha Andrew!
Давайте определим термины.
Есть лист Excel. Он состоит из страниц (потому что может быть большим). Страницы могут располагаться сверху вниз, либо слева направо.

Скажем, заполнили лист какими-то данными. Они расползлись по нескольким страницам.
Хочется иметь какой-то результат, основанный на данных только страницы? А где? Можно в колонтитуле этой страницы? Ваш ответ всё равно недостаточно полон.

Ещё раз скажу - в Excel можно всё, но надо точно поставить задачу.

Может быть taplica мне пришлёт лист с данными и скажет, что с ними надо делать, вот тогда всё станет ясно!

[Пытливый]

Код впечатляет, а результат - полная ахинея!

Эй! А кто задачу поставит корректно и понятно?

Согласен, ахинея! :О) Пытался продемонстрировать в работе описанный мною ранее алгоритм.
ИМХО, если человек просит совета, надо ему предложить направление, "в которое" можно думать - пусть додумывает и делает, как ему надо сам. А делать за кого-то - занятие нудное и высокооплачиваемое.

[Dracosha Andrew]

ADSemenov.ru, насчёт того, что страницы могуть "вбок" я как-то забыл

[taplica]

Попробую поставить задачу конкретнее.
Есть бланк строго определенной формы и куча данных которые нужно запихать в этот бланк. На каждой странице вверху должна быть шапка,а внизу в нескольких столбцах располагаться итоговая сумма (сумма по странице, а не по всему документу). Количество строк на разных страницах тоже будет разным - так как в некоторых столбцах данные приходится переносить по словам. Делать одинаковыми размеры строк (в высоту) таблицы не желательно, так как данных очень много, а бумаги ограниченное количество, а в длину делать столбцы больше тем более не получится - данные и так по ширине страницы впритык стоят.
Надеюсь так понятнее.
Всем большое спасибо за советы

[ADSemenov.ru]

taplica,
У Вашей задачи есть два пути решения.-

1. Перед печатью вставить необходимые строки в конце каждой страницы, но этот способ сопряжён с большими трудностями, потому что после каждой вставки разрывы страниц смещаются и может быть не на одну строку, так как высота строк разная. Каждый раз Excel надо "заставлять" пересчитывать горизонтальные PageBreak'и, по которым и находятся места вставок. А если потом будут внесены изменения в листе, то требуется программно уничтожать старые вставки перед вставкой новых.

2. Удовлетвориться печатью необходимой информации о текущей странице листа в нижнем колонтитуле. Примерно так. - Создаётся нижний колонтитул. Создаётся своя панель инструментов с кнопкой печати. Макрос при нажатии на кнопку должен распечатывать лист постранично и для каждой страницы вставлять свои данные в нижний колонтитул. Недостаток - нет связи с разметкой столбцов, но это можно восполнить поясняющим текстом.

Первый пример не берусь показать - мало времени. А вот второй, если устраивает, могу попробовать.

[CrazyBuh]

Попробую прикрепить файл. Всё работает. Или почти всё..

[Dracosha Andrew]

CrazyBuh, Мне понравилось... Работает

[CrazyBuh]

Одно меня смущает... почему в Windows XP - Office XP в макросах так тормозит. В 98/ME все просто летает. Или просто у меня Office "не той системы"?

[Dracosha Andrew]

CrazyBuh, Может просто памяти маловато? Или на не интеловском чипсете фирминнные дровишки не загружены?

[ADSemenov.ru]

taplica,
для Вас ЗДЕСЬ ещё пример с добавлением строк на каждой странице. Для нормальной работы в первой ячейке первой строки данных для суммирования надо иметь примечание "begin". Формирование строк применимо к любому принтеру и отрабатывает по событию "перед печатью" или "предварительный просмотр". Удаляются строки перед новым формированием по признаку прмечания в первой ячеки "footer".
В win98 работает очень быстро. Для изменения текста суммирующей строки, положения и количества суммирующих ячеек необходимо подкорректировать подпрограмму setFooter(). Там совершенно нет ничего сложного - пара строк.
Можно ещё ввести признак конца суммирования...

CrazyBuh! Ваш пример просто грандиозен и потрясающ! Серьёзно, чувствуется многолетняя практика и хороший настрой (в отличие от Пытливого). Вы меня заставили вспомнить молодость...

[CrazyBuh]

ADSemenov.ru - простенько и со вкусом! Знал бы, что можно делать ТАК - это значительно упрощает задачу и многое можно было бы сделать по- другому. В завершении темы прикрепляю очередную версию программы. Работает с многострочными шаблонами и некоторые другие фичи. В качестве примера рассматривается формирование книги продаж.

[ADSemenov.ru]

CrazyBuh!

Спасибо. Есть ещё порох в пороховницах.

Хотелось бы получить нам от taplica доброе слово...

[Пытливый]

ADSemenov.ru
CrazyBuh

Баааальшой respect! Здорово сделано! Спасибо за науку! :О)