Återställa sidnumret på en gruppnivå i en Access-rapport

Anteckning

Office 365 ProPlus byter namn till Microsoft 365-appar för företag. Mer information om den här ändringen finns i det här blogginlägget.

Måttlig: Kräver grundläggande makron, kodning och kompatibilitetsfärdigheter.

Den här artikeln gäller en Microsoft Access-databas (.mdb eller .accdb) och ett Microsoft Access-projekt (.adp).

Sammanfattning

När du ändrar avsnittsegenskaperna för en rapport kan du utforma en rapport som bryter sidan för varje ny post i en grupp och sedan återställa sidnumret i rapporten. Till exempel är rapporten Försäljning per land för anställda i exempeldatabasen Northwind.mdb utformad med den här funktionen.

Mer information

Anteckning

Vilken metod som används för att återställa sidnumret för varje nytt land beror på om du vill visa sidnumret i sidhuvudet eller sidfoten. Om du använder fel metod återställs inte sidnumret korrekt.

  1. Starta Access och öppna sedan exempeldatabasen Northwind.mdb eller exempelprojektet NorthwindCS.adp.

  2. Öppna rapporten Försäljning av anställda per land i designvyn.

  3. Klicka på avsnittet Land sidhuvud, högerklicka på egenskapen Vid format och klicka sedan på Skapa.

    Undersök händelseproceduren.

  4. Klicka på avsnittet Land sidfot, högerklicka på egenskapen På format och ange sedan egenskapen ForceNewPage till Efter avsnitt.

Metod 2: Sidnumret visas i sidhuvudet

  1. Starta Access och öppna sedan exempeldatabasen Northwind.mdb eller exempelprojektet NorthwindCS.adp.

  2. Öppna rapporten Försäljning av anställda per land i designvyn.

  3. Klicka på avsnittet Land sidfot, högerklicka på egenskapen Vid format och klicka sedan på Skapa.

  4. Klicka på Kodverktyget och sedan på OK.

  5. I fönstret Kod skriver du: Sida = 0

  6. Ändra händelsen VidFormat för landhuvudet så att egenskapen Sida inte anges i den här händelsen. För att göra detta skriver du en apostrof före raden med det första sidnumret.

    Koden ser ut ungefär så här:

    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. Klicka på avsnittet Sidhuvud, ange egenskapen Höjd till 0,25 och ange sedan egenskapen Bakgrundsfärg till 8421504.

  8. Flytta kontrollen med namnet Sidnummer till sidhuvudet.

    Sidnummerkontrollen visar sidnumret.

När du använder någon av dessa metoder börjar varje land på en ny sida och numrering för varje nytt avsnitt börjar med siffran 1.