Want to win a PS4? Go Premium and enter to win our High-Tech Treats giveaway. Enter to Win

x
?
Solved

Hide page header on first page of group

Posted on 2008-06-26
5
Medium Priority
?
1,619 Views
Last Modified: 2013-11-28
I have a report with one group. When the group header displaying, I want to suppress the page header (the group header contains same information as page header + some addition information). The group header information must be displayed before the page header information, therefore I cannot combine these. The group footer has set the "Force new Page" property to "After Section".

I have tried to manipulate page header sections visible property in vba, but without success.
0
Comment
Question by:tselectro
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
  • 3
  • 2
5 Comments
 
LVL 23

Expert Comment

by:irudyk
ID: 21877825
If I'm reading it correctly you want hide the Page header and display the Group header for page 1 and for pages 2 onwards, you want to display the Page header and hide the Group header.  If that is correct then try the following code to be place in the report page header's On Format routine.  You will need to change the PageHeaderSection and GroupHeader0 referneces to whatever they are called in your report.
Private Sub PageHeaderSection_Format(Cancel As Integer, FormatCount As Integer)
PageHeaderSection.Visible = (Me.Page > 1)
GroupHeader0.Visible = (Me.Page <= 1)
End Sub

Open in new window

0
 

Author Comment

by:tselectro
ID: 21879017
Hi, that is not exactly what I want. The reports can consist of lots of records, in many groups. Ex. page 1-3 is record belonging to group 1, page 4 is group 2, page 5-10 is group 3 etc.  The page header section must be suppressed for every first page of group, i.e in this ex. page 1, page 4 and page 5.
(NB the reports have one group (ex ProductionID))
0
 
LVL 23

Expert Comment

by:irudyk
ID: 21879436
Okay, well try the following code
'Under the general declarations
Dim strProductionID As String
 
Private Sub GroupHeader0_Format(Cancel As Integer, FormatCount As Integer)
If strProductionID <> Obj Then
    strProductionID = Obj
    GroupHeader0.Visible = True
Else
    GroupHeader0.Visible = False
End If
End Sub
 
Private Sub PageHeaderSection_Format(Cancel As Integer, FormatCount As Integer)
If strProductionID <> Obj Then
    PageHeaderSection.Visible = False
Else
    PageHeaderSection.Visible = True
End If
End Sub

Open in new window

0
 
LVL 23

Accepted Solution

by:
irudyk earned 1500 total points
ID: 21879458
The Obj should have read ProductionID...See revised code below
'Under the general declarations
Dim strProductionID As String
 
Private Sub GroupHeader0_Format(Cancel As Integer, FormatCount As Integer)
If strProductionID <> ProductionID Then
    strProductionID = ProductionID
    GroupHeader0.Visible = True
Else
    GroupHeader0.Visible = False
End If
End Sub
 
Private Sub PageHeaderSection_Format(Cancel As Integer, FormatCount As Integer)
If strProductionID <> ProductionID Then
    PageHeaderSection.Visible = False
Else
    PageHeaderSection.Visible = True
End If
End Sub

Open in new window

0
 

Author Closing Comment

by:tselectro
ID: 31471090
Hi, that is exactly what I want!
0

Featured Post

What does it mean to be "Always On"?

Is your cloud always on? With an Always On cloud you won't have to worry about downtime for maintenance or software application code updates, ensuring that your bottom line isn't affected.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

In earlier versions of Windows (XP and before), you could drag a database to the taskbar, where it would appear as a taskbar icon to open that database.  This article shows how to recreate this functionality in Windows 7 through 10.
If you need a simple but flexible process for maintaining an audit trail of who created, edited, or deleted data from a table, or multiple tables, and you can do all of your work from within a form, this simple Audit Log will work for you.
Using Microsoft Access, learn some simple rules for how to construct tables in a relational database. Split up all multi-value fields into single values: Split up fields that belong to other things into separate tables: Make sure that all record…
What’s inside an Access Desktop Database. Will look at the basic interface, Navigation Pane (Database Container), Tables, Queries, Forms, Report, Macro’s, and VBA code.

609 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question