ACCESS FEED: Re: [MS_AccessPros] Access Report Format event question

Jumat, 29 April 2016

Re: [MS_AccessPros] Access Report Format event question

Jim, adding on ... you can set the DefaultView property of the report (FORMAT tab of Property Sheet) to Print Preview

warm regards,
crystal

~ have an awesome day ~

On 4/29/2016 8:26 AM, Jim Wagner luvmymelody@yahoo.com [MS_Access_Professionals] wrote:

That was it.

Thank You

Jim Wagner

On Thursday, April 28, 2016 8:10 PM, "Jim Wagner luvmymelody@yahoo.com [MS_Access_Professionals]" <MS_Access_Professionals@yahoogroups.com> wrote:

Duane,

I think that was it. I will check with my boss and see if that is it.

Thank You

Jim Wagner

On Thursday, April 28, 2016 12:04 PM, "Duane Hookom duanehookom@hotmail.com [MS_Access_Professionals]" <MS_Access_Professionals@yahoogroups.com> wrote:

Are you viewing in Report View or Print Preview? Code doesn't run in Report View.

Duane

To: MS_Access_Professionals@yahoogroups.com
From: MS_Access_Professionals@yahoogroups.com
Date: Thu, 28 Apr 2016 11:20:48 -0700
Subject: [MS_AccessPros] Access Report Format event question

Hello all,

I have a report that have several headers named
GroupHeader1
GroupHeader2

I want to hide the headers if there is no data for them. I have the following code in both OnFormat events, below. It works great and then it does not. But if we just open the VBA window to the events. and then close the VBA window it works.
When it does not work it shows the headers. When it works the headers are NOT visible.

Is there something missing from the code or something else?

Thank You
Jim Wagner

Private Sub GroupHeader1_Format(Cancel As Integer, FormatCount As Integer)
Cancel = IsNull(Me!Subdept)
End Sub

Private Sub GroupHeader2_Format(Cancel As Integer, FormatCount As Integer)
Cancel = IsNull(Me!Subdept2)
End Sub