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
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
__._,_.___
Posted by: Jim Wagner <luvmymelody@yahoo.com>
Reply via web post | • | Reply to sender | • | Reply to group | • | Start a New Topic | • | Messages in this topic (4) |
Upgrade your account with the latest Yahoo Mail app
Get organized with the fast and easy-to-use Yahoo Mail app. Upgrade today!
.
__,_._,___
Tidak ada komentar:
Posting Komentar