Отчет ACCESS. Новая группа с нового листа.

02.01.2007, 22:43. **Показов** 5850. **Ответов** 5

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

Добрый вечер, друзья! Наступил новый 2007, с чем всех Вас и поздравляю! И как и в предыдущем году, снова нужна Ваша помощь.
Есть отчет, с группировкой по нескольким полям. Что нужно сделать, чтобы каждая группа начиналась с нового листа?
Спасибо и успехов Вам в Ваших добрых делах!

@BoNiM · 03.01.2007, 13:57

Для свойства "Конец страницы" примечания группы установить значение, например, "После раздела"

03.01.2007, 18:18

В точку, спасибо BoNiM!
А как сделать, что-бы нумерация листов в каждой группе начиналась с 1?
Сейчас использую TextBox в заголовке группы в котором свойство данные ="Лист " & [Page]. И [Page] соответсвенно не обращает внимания на группы и нумерует каждую страницу по порядку.
Если нет простого способа, как в предыдущем вопросе, то может есть идеи как это можно реализовать?
Буду очень благодарен.
Best regards!

@BoNiM · 03.01.2007, 20:41

Попробуйте так:

1) В модуле отчета поместите

Visual Basic

Option Compare Database
Option Explicit
Dim VPag As Integer
Function FPag()
  FPag = Me.Page - VPag + 1
End Function

2) B обработчик события Format заголовка группы

Visual Basic

1	VPag = Page()

3) В нижнем колонтитуле поле с данными

="Страница " & FPag()

@BoNiM · 03.01.2007, 20:51

Извиняюсь, не VPag = Page(), а VPag = Me.Page

Хотя, может быть, и так пойдет

03.01.2007, 21:23

Спасибо, более чем исчерпывающий ответ!
После нескольких экспериментов и небольшого редактирования все отлично заработало!
А именно - в моей ситуации я сделал обработку события Format примечания группы и убрал + 1 в функции. Иначе получалось, что страницы начинали прибавлятся только с первого листа следующей группы.

) ( Наверно потому, что мне пришлось перенести отображение нумерации страниц из заголовка группы в верхний колонтитул отчета. )
Но сейчас все отлично!! Спасибо за подмогу!!

slamer
		1
	Отчет ACCESS. Новая группа с нового листа. 02.01.2007, 22:43. Показов 5850. Ответов 5 Метки нет (Все метки) Добрый вечер, друзья! Наступил новый 2007, с чем всех Вас и поздравляю! И как и в предыдущем году, снова нужна Ваша помощь. Есть отчет, с группировкой по нескольким полям. Что нужно сделать, чтобы каждая группа начиналась с нового листа? Спасибо и успехов Вам в Ваших добрых делах!

@BoNiM 7 / 7 / 1 Регистрация: 06.12.2006 Сообщений: 329
	03.01.2007, 13:57	2
	Для свойства "Конец страницы" примечания группы установить значение, например, "После раздела" 1

slamer
	03.01.2007, 18:18	3
	В точку, спасибо BoNiM! А как сделать, что-бы нумерация листов в каждой группе начиналась с 1? Сейчас использую TextBox в заголовке группы в котором свойство данные ="Лист " & [Page]. И [Page] соответсвенно не обращает внимания на группы и нумерует каждую страницу по порядку. Если нет простого способа, как в предыдущем вопросе, то может есть идеи как это можно реализовать? Буду очень благодарен. Best regards!

@BoNiM 7 / 7 / 1 Регистрация: 06.12.2006 Сообщений: 329
	03.01.2007, 20:51	5
	Извиняюсь, не VPag = Page(), а VPag = Me.Page Хотя, может быть, и так пойдет 0

slamer
	03.01.2007, 21:23	6
	Спасибо, более чем исчерпывающий ответ! После нескольких экспериментов и небольшого редактирования все отлично заработало! А именно - в моей ситуации я сделал обработку события Format примечания группы и убрал + 1 в функции. Иначе получалось, что страницы начинали прибавлятся только с первого листа следующей группы. ) ( Наверно потому, что мне пришлось перенести отображение нумерации страниц из заголовка группы в верхний колонтитул отчета. ) Но сейчас все отлично!! Спасибо за подмогу!!