Results 1 to 5 of 5
  1. #1
    Star Lounger
    Join Date
    Feb 2001
    Location
    UK
    Posts
    78
    Thanks
    0
    Thanked 0 Times in 0 Posts

    Force new Sheet in report (Access 2000)

    I have a report which lists stuff by a number of stores which is printed double sided. I need to be able to send the pages for each store to the store in question. Each store has 9 pages, which means that the next store in sequence starts on the back of the last page in the previous store's stuff. How do I force each new store to appear on a new sheet of paper rather than on the back of the last sheet of the previous store's stuff? (As opposed to a new page)

  2. #2
    Plutonium Lounger
    Join Date
    Mar 2002
    Posts
    84,353
    Thanks
    0
    Thanked 29 Times in 29 Posts

    Re: Force new Sheet in report (Access 2000)

    Try the following on a copy first:

    I assume the report is grouped by store. If you don't have a group footer yet, add it (it will remain blank). Set the Force New Page for the group footer to After Section, make sure that Keep Together is set to Yes, and experiment with expanding the height of this section until a blank page appears after the 9 pages for each store.

  3. #3
    Star Lounger
    Join Date
    Feb 2001
    Location
    UK
    Posts
    78
    Thanks
    0
    Thanked 0 Times in 0 Posts

    Re: Force new Sheet in report (Access 2000)

    It is indeed grouped by store. Your solution is brilliantly simple and it works, however it tranpires that there are exceptions to the 9 pages per store rule which throws everything out again. I may experiment with doing something with the page number in the footer formatting event.

    I'll update this thread with the result.

    Thanks

  4. #4
    Plutonium Lounger
    Join Date
    Mar 2002
    Posts
    84,353
    Thanks
    0
    Thanked 29 Times in 29 Posts

    Re: Force new Sheet in report (Access 2000)

    Yup, if the number of pages per group varies, you will need some event code. It's a good idea to experiment first; post back if you need assistance.

  5. #5
    Star Lounger
    Join Date
    Feb 2001
    Location
    UK
    Posts
    78
    Thanks
    0
    Thanked 0 Times in 0 Posts

    Re: Force new Sheet in report (Access 2000)

    I managed to do it by putting the follwing code on the store group footer format event:

    Dim i As Integer
    i = Page Mod 2
    If i = 0 Then
    '//Even number page
    StoreNameFooter.Height = 500
    Else
    '//Odd number page
    StoreNameFooter.Height = 8560
    End If

    Thanks for your help.

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •