Como repor o número de página num nível de grupo num relatório do Access

Moderado: requer competências básicas de macro, codificação e interoperabilidade.

Este artigo aplica-se a uma base de dados do Microsoft Access (.mdb ou .accdb) e a um projeto do Microsoft Access (.adp).

Resumo

Quando modificar as propriedades de secção de um relatório, pode estruturar um relatório que quebra a página de cada nova entrada num grupo e, em seguida, repõe o número de página do relatório. Por exemplo, o relatório Vendas de Colaboradores por País/Região na base de dados de exemplo Northwind.mdb foi concebido com esta funcionalidade.

Mais informações

Método 1: o número de página aparece no rodapé da página

1. Inicie o Access e, em seguida, abra a base de dados de exemplo Northwind.mdb ou o projeto de exemplo NorthwindCS.adp.

2. Abra o relatório Vendas de Colaboradores por País/Região na vista Estrutura.

3. Clique na secção Cabeçalho país/região , clique com o botão direito do rato na propriedade No Formato e, em seguida, clique em Criar.

   Examine o procedimento do evento.

4. Clique na secção Rodapé do País/Região , clique com o botão direito do rato na propriedade No Formato e, em seguida, defina a propriedade ForceNewPage como Depois da Secção.

Método 2: o número de página é apresentado no cabeçalho da página

1. Inicie o Access e, em seguida, abra a base de dados de exemplo Northwind.mdb ou o projeto de exemplo NorthwindCS.adp.

2. Abra o relatório Vendas de Colaboradores por País/Região na vista Estrutura.

3. Clique na secção Rodapé do País/Região , clique com o botão direito do rato na propriedade No Formato e, em seguida, clique em Criar.

4. Clique em Construtor de Código e, em seguida, clique em OK.

5. Na janela Código, escreva: Página = 0

6. Altere o evento OnFormat do Cabeçalho do País/Região para que a propriedade Página não esteja definida neste evento. Para tal, escreva um apóstrofo antes da linha com o número de página inicial.

   O código terá um aspeto semelhante ao seguinte código:

   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. Clique na secção Cabeçalho da Página , defina a propriedade Altura como 0,25 e, em seguida, defina a propriedade Cor de Fundo como 8421504.

8. Mova o controlo denominado Número de Página para o Cabeçalho da Página.

   O controlo Número de Página apresenta o número de página.

Quando utiliza um destes métodos, cada país/região começa numa nova página e a numeração de cada nova secção começa com o número 1.