Report, 1st Page (1 Viewer)

L

Leo_Polla_Psemata

Registered User.

Local time

Today, 10:39

Joined

Mar 24, 2014

Messages

364

• Jan 22, 2018

• #1

Hi
I have a report which works as "quotation".
There are report header/footer, page header/footer, no problem with these
HOWEVER
I need always to display a "first" page which is a full A4 page with company's logo - company's moto and advertisements, on the second page the report "quotation" starts

The problem is that there must be no page or report header footer on first page.
The report and page header footer must be displays only from 2nd page.
How can I do this?

 

P

plog

Banishment Pending

Local time

Today, 12:39

Joined

May 11, 2011

Messages

11,646

• Jan 22, 2018

• #2

Report and subreport.

I have a report which works as "quotation".

Click to expand...

That's the subreport. Now make the first page (logo, motto, etc.) its own report, add a page break at the bottom and after that add the existing report to it as a subreport.

 

arnelgp

..forever waiting... waiting for jellybean!

Local time

Tomorrow, 01:39

Joined

May 7, 2009

Messages

19,237

• Jan 22, 2018

• #3

put all the "content" of your
company motto, advertisement on
Report Header.

Adjust the Height of Report Header
just enough and not to exceed
the height of your Paper Size.

Put a Page Break Control on
the Report Header, just above
the Page Header.

Add an Unbound Textbox (txtPage) to Page Footer
Section. This will serve as your page number.
Make the Original Page Number visible Property
To No.

add code to the Page Footer Format Event:

Code:Copy to clipboard

Private Sub PageFooterSection_Format(Cancel As Integer, FormatCount As Integer)
    If Me.Page = 1 Then
        Me.txtPage.Visible = False
    Else
        Me.txtPage = (Me.Page - 1) & " of " & (Me.Pages - 1)
        Me.txtPage.Visible = True
    End If

End Sub

 

Ranman256

Well-known member

Local time

Today, 13:39

Joined

Apr 9, 2015

Messages

4,337

• Jan 22, 2018

• #4

put in the report, and page header items
set the ON PRINT event of the header, show or hide the items

Code:Copy to clipboard

Private Sub ReportHeader_Print(Cancel As Integer, PrintCount As Integer)
  logo.visible = page >1
  txtbox.visible = page >1
end sub

 

M

Mark_

Longboard on the internet

Local time

Today, 10:39

Joined

Sep 12, 2017

Messages

2,111

• Jan 24, 2018

• #5

Alternate, depending on the quality of your cover page, would be to have them professionally done then attached prior to giving to clients.

More expensive but would avoid issues if your company decides they want them looking very very very nice. Were I you I'd check to see if this is the case prior to them giving you grief over the quality you produce.