Сброс номера страницы на уровне группы в отчете Access

Примечание

Office 365 ProPlus переименован в Майкрософт 365 корпоративные приложения. Для получения дополнительной информации об этом изменении прочитайте этот блог.

Умеренный: требуются базовые навыки макросов, программирования и взаимодействия.

Эта статья относится к базе данных Microsoft Access (MDB или ACCDB) и проекту Microsoft Access (ADP).

Аннотация

При изменении свойств раздела отчета можно создать отчет, который будет разрывать страницу для каждой новой записи в группе, а затем сбрасывает номер страницы отчета. Например, отчет по продажам по странам в учебной базе данных Northwind. mdb создан с помощью этой функции.

Дополнительные сведения

Примечание

Метод, используемый для сброса номера страницы для каждой новой страны, зависит от того, хотите ли вы отображать номер страницы в заголовке страницы или в нижнем колонтитуле страницы. При использовании неправильного метода номер страницы сбрасывается неправильно.

  1. Запустите Access, а затем откройте учебную базу данных Northwind. mdb или пример проекта Норсвиндкс. ADP.

  2. Откройте отчет о продажах сотрудников по странам в режиме конструктора.

  3. Щелкните раздел Заголовок страны , щелкните правой кнопкой мыши свойство On Format , а затем выберите команду построить.

    Изучите процедуру обработки события.

  4. Щелкните раздел Нижний колонтитул страны , щелкните правой кнопкой мыши свойство On Format , а затем присвойте свойству конец страницы значение After Section.

Способ 2: номер страницы отображается в заголовке страницы

  1. Запустите Access, а затем откройте учебную базу данных Northwind. mdb или пример проекта Норсвиндкс. ADP.

  2. Откройте отчет о продажах сотрудников по странам в режиме конструктора.

  3. Щелкните раздел Нижний колонтитул страны , щелкните правой кнопкой мыши свойство On Format , а затем выберите команду создать.

  4. Щелкните Построитель кодаи нажмите кнопку ОК.

  5. В окне Код введите: Page = 0

  6. Измените событие OnFormat заголовка Country таким образом, чтобы свойство Page не было задано в этом событии. Чтобы сделать это, введите апостроф перед строкой с начальным номером страницы.

    Код будет выглядеть примерно так, как показано в следующем фрагменте кода:

    Private Sub GroupHeader0_Format(Cancel As Integer, FormatCount As Integer)
    ' Set page number to 1 when a new group starts.
        ' Page = 1
    End Sub 
    
  7. Щелкните раздел заголовок страницы , задайте для свойства Height значение 0,25, а затем задайте для свойства цвет фона значение 8421504.

  8. Переместите элемент управления с именем "номер страницы" в верхний колонтитул страницы.

    Элемент управления "номер страницы" отображает номер страницы.

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