Conditional Footers in a report

Klatuu I tried your solution but it did not work the way I am hoping it to
work in a report. My objective is for a text box to be displayed in a
"CableID footer" when the CableID field is text(a non blank string) and No
"CableID footer" be displayed when the CableID field is blank. The solution
you gave me did not appear to work this way. Perhaps I did not implement it
correctly.

Can you post back with the code the way you implemented it?
--
Dave Hargis, Microsoft Access MVP


"FSHOTT" wrote:

Klatuu I tried your solution but it did not work the way I am hoping it to
work in a report. My objective is for a text box to be displayed in a
"CableID footer" when the CableID field is text(a non blank string) and No
"CableID footer" be displayed when the CableID field is blank. The solution
you gave me did not appear to work this way. Perhaps I did not implement it
correctly.

Here is the code. Note that the database I am trying this in uses Wire ID
instead of CableID. Same field just renamed. Is there a way I can send you
the database to look at?


Private Sub GroupFooter3_Format(Cancel As Integer, FormatCount As Integer)
Me.ReportFooter.Visible = Len(Nz(Me![Wire ID], vbNullString)) 0
End Sub
--
frank-a


"Klatuu" wrote:

Can you post back with the code the way you implemented it?
--
Dave Hargis, Microsoft Access MVP


"FSHOTT" wrote:

Klatuu I tried your solution but it did not work the way I am hoping it to
work in a report. My objective is for a text box to be displayed in a
"CableID footer" when the CableID field is text(a non blank string) and No
"CableID footer" be displayed when the CableID field is blank. The solution
you gave me did not appear to work this way. Perhaps I did not implement it
correctly.

You either have the code in the wrong event or you are trying to hid the
wrong section. The code is in a Group footer section. If you want to make
the group footer hidden, change it to:
Private Sub GroupFooter3_Format(Cancel As Integer, FormatCount As Integer)
Me.GroupFooter3.Visible = Len(Nz(Me![Wire ID], vbNullString)) 0
End Sub

If you are wanting to hide the report footer, move it the the report
footer's format event.

I am always happy to assist with any database needs; however, free
assistance is limited to these public news groups so all may benefit. If you
feel you need professional assistance, please post back with an email address
and I will contact you to discuss rates and terms.

--
Dave Hargis, Microsoft Access MVP


"FSHOTT" wrote:

Here is the code. Note that the database I am trying this in uses Wire ID
instead of CableID. Same field just renamed. Is there a way I can send you
the database to look at?


Private Sub GroupFooter3_Format(Cancel As Integer, FormatCount As Integer)
Me.ReportFooter.Visible = Len(Nz(Me![Wire ID], vbNullString)) 0
End Sub
--
frank-a


"Klatuu" wrote:

Can you post back with the code the way you implemented it?
--
Dave Hargis, Microsoft Access MVP


"FSHOTT" wrote:

Klatuu I tried your solution but it did not work the way I am hoping it to
work in a report. My objective is for a text box to be displayed in a
"CableID footer" when the CableID field is text(a non blank string) and No
"CableID footer" be displayed when the CableID field is blank. The solution
you gave me did not appear to work this way. Perhaps I did not implement it
correctly.

OK! That worked Thanks = . I thought I tried the code you sent and it
didn't work. I obviously didn't do it correctly. By the way I have been
trying to take a 2 day VBA Course for ACCESS locally but the instructor left
the organization. Can you direct me to sources for courses in ACCESS and VBA
for ACCESS? Near upstate NY?
--
frank-a


"Klatuu" wrote:

You either have the code in the wrong event or you are trying to hid the
wrong section. The code is in a Group footer section. If you want to make
the group footer hidden, change it to:
Private Sub GroupFooter3_Format(Cancel As Integer, FormatCount As Integer)
Me.GroupFooter3.Visible = Len(Nz(Me![Wire ID], vbNullString)) 0
End Sub

If you are wanting to hide the report footer, move it the the report
footer's format event.

I am always happy to assist with any database needs; however, free
assistance is limited to these public news groups so all may benefit. If you
feel you need professional assistance, please post back with an email address
and I will contact you to discuss rates and terms.

--
Dave Hargis, Microsoft Access MVP


"FSHOTT" wrote:

Here is the code. Note that the database I am trying this in uses Wire ID
instead of CableID. Same field just renamed. Is there a way I can send you
the database to look at?


Private Sub GroupFooter3_Format(Cancel As Integer, FormatCount As Integer)
Me.ReportFooter.Visible = Len(Nz(Me![Wire ID], vbNullString)) 0
End Sub
--
frank-a


"Klatuu" wrote:

Can you post back with the code the way you implemented it?
--
Dave Hargis, Microsoft Access MVP


"FSHOTT" wrote:

Klatuu I tried your solution but it did not work the way I am hoping it to
work in a report. My objective is for a text box to be displayed in a
"CableID footer" when the CableID field is text(a non blank string) and No
"CableID footer" be displayed when the CableID field is blank. The solution
you gave me did not appear to work this way. Perhaps I did not implement it
correctly.

I wouldn't know of any specific trainers available in your area, but here is
a link to a good primer that may help:

http://www.accessmvp.com/Strive4Peace/Index.htm

If you are one (like I) who gets more from classroom participation, you
might check you local community college. They will sometimes have Access
courses. Also, just some intensive googling might be in order.
--
Dave Hargis, Microsoft Access MVP


"FSHOTT" wrote:

OK! That worked Thanks = . I thought I tried the code you sent and it
didn't work. I obviously didn't do it correctly. By the way I have been
trying to take a 2 day VBA Course for ACCESS locally but the instructor left
the organization. Can you direct me to sources for courses in ACCESS and VBA
for ACCESS? Near upstate NY?
--
frank-a


"Klatuu" wrote:

You either have the code in the wrong event or you are trying to hid the
wrong section. The code is in a Group footer section. If you want to make
the group footer hidden, change it to:
Private Sub GroupFooter3_Format(Cancel As Integer, FormatCount As Integer)
Me.GroupFooter3.Visible = Len(Nz(Me![Wire ID], vbNullString)) 0
End Sub

If you are wanting to hide the report footer, move it the the report
footer's format event.

I am always happy to assist with any database needs; however, free
assistance is limited to these public news groups so all may benefit. If you
feel you need professional assistance, please post back with an email address
and I will contact you to discuss rates and terms.

--
Dave Hargis, Microsoft Access MVP


"FSHOTT" wrote:

Here is the code. Note that the database I am trying this in uses Wire ID
instead of CableID. Same field just renamed. Is there a way I can send you
the database to look at?


Private Sub GroupFooter3_Format(Cancel As Integer, FormatCount As Integer)
Me.ReportFooter.Visible = Len(Nz(Me![Wire ID], vbNullString)) 0
End Sub
--
frank-a


"Klatuu" wrote:

Can you post back with the code the way you implemented it?
--
Dave Hargis, Microsoft Access MVP


"FSHOTT" wrote:

Klatuu I tried your solution but it did not work the way I am hoping it to
work in a report. My objective is for a text box to be displayed in a
"CableID footer" when the CableID field is text(a non blank string) and No
"CableID footer" be displayed when the CableID field is blank. The solution
you gave me did not appear to work this way. Perhaps I did not implement it
correctly.

Dave Thank You for the leads.
--
frank-a


"Klatuu" wrote:

I wouldn't know of any specific trainers available in your area, but here is
a link to a good primer that may help:

http://www.accessmvp.com/Strive4Peace/Index.htm

If you are one (like I) who gets more from classroom participation, you
might check you local community college. They will sometimes have Access
courses. Also, just some intensive googling might be in order.
--
Dave Hargis, Microsoft Access MVP


"FSHOTT" wrote:

OK! That worked Thanks = . I thought I tried the code you sent and it
didn't work. I obviously didn't do it correctly. By the way I have been
trying to take a 2 day VBA Course for ACCESS locally but the instructor left
the organization. Can you direct me to sources for courses in ACCESS and VBA
for ACCESS? Near upstate NY?
--
frank-a


"Klatuu" wrote:

You either have the code in the wrong event or you are trying to hid the
wrong section. The code is in a Group footer section. If you want to make
the group footer hidden, change it to:
Private Sub GroupFooter3_Format(Cancel As Integer, FormatCount As Integer)
Me.GroupFooter3.Visible = Len(Nz(Me![Wire ID], vbNullString)) 0
End Sub

If you are wanting to hide the report footer, move it the the report
footer's format event.

I am always happy to assist with any database needs; however, free
assistance is limited to these public news groups so all may benefit. If you
feel you need professional assistance, please post back with an email address
and I will contact you to discuss rates and terms.

--
Dave Hargis, Microsoft Access MVP


"FSHOTT" wrote:

Here is the code. Note that the database I am trying this in uses Wire ID
instead of CableID. Same field just renamed. Is there a way I can send you
the database to look at?


Private Sub GroupFooter3_Format(Cancel As Integer, FormatCount As Integer)
Me.ReportFooter.Visible = Len(Nz(Me![Wire ID], vbNullString)) 0
End Sub
--
frank-a


"Klatuu" wrote:

Can you post back with the code the way you implemented it?
--
Dave Hargis, Microsoft Access MVP


"FSHOTT" wrote:

Klatuu I tried your solution but it did not work the way I am hoping it to
work in a report. My objective is for a text box to be displayed in a
"CableID footer" when the CableID field is text(a non blank string) and No
"CableID footer" be displayed when the CableID field is blank. The solution
you gave me did not appear to work this way. Perhaps I did not implement it
correctly.

Dave I have an additional question since I implenmented your solution. Now
that I can make the footer visible or invisible based on a [WireID] field, I
would now like to make another footer visible based on whether a [DZone]
field from the current and previous records are equal or changed. I tried to
define a [DZone1] and [Dzone2] and compare them to determine whether the
footer is visible but it appears my DZones are always equal. Is there a way I
can get DZone1 = [DZone].[for record x-1] and DZone2 = [DZone].[for record
x]? Then I assume I can use a logical expression to set the visibility of a
footer.
--
frank-a


"FSHOTT" wrote:

Dave Thank You for the leads.
--
frank-a


"Klatuu" wrote:

I wouldn't know of any specific trainers available in your area, but here is
a link to a good primer that may help:

http://www.accessmvp.com/Strive4Peace/Index.htm

If you are one (like I) who gets more from classroom participation, you
might check you local community college. They will sometimes have Access
courses. Also, just some intensive googling might be in order.
--
Dave Hargis, Microsoft Access MVP


"FSHOTT" wrote:

OK! That worked Thanks = . I thought I tried the code you sent and it
didn't work. I obviously didn't do it correctly. By the way I have been
trying to take a 2 day VBA Course for ACCESS locally but the instructor left
the organization. Can you direct me to sources for courses in ACCESS and VBA
for ACCESS? Near upstate NY?
--
frank-a


"Klatuu" wrote:

You either have the code in the wrong event or you are trying to hid the
wrong section. The code is in a Group footer section. If you want to make
the group footer hidden, change it to:
Private Sub GroupFooter3_Format(Cancel As Integer, FormatCount As Integer)
Me.GroupFooter3.Visible = Len(Nz(Me![Wire ID], vbNullString)) 0
End Sub

If you are wanting to hide the report footer, move it the the report
footer's format event.

I am always happy to assist with any database needs; however, free
assistance is limited to these public news groups so all may benefit. If you
feel you need professional assistance, please post back with an email address
and I will contact you to discuss rates and terms.

--
Dave Hargis, Microsoft Access MVP


"FSHOTT" wrote:

Here is the code. Note that the database I am trying this in uses Wire ID
instead of CableID. Same field just renamed. Is there a way I can send you
the database to look at?


Private Sub GroupFooter3_Format(Cancel As Integer, FormatCount As Integer)
Me.ReportFooter.Visible = Len(Nz(Me![Wire ID], vbNullString)) 0
End Sub
--
frank-a


"Klatuu" wrote:

Can you post back with the code the way you implemented it?
--
Dave Hargis, Microsoft Access MVP


"FSHOTT" wrote:

Klatuu I tried your solution but it did not work the way I am hoping it to
work in a report. My objective is for a text box to be displayed in a
"CableID footer" when the CableID field is text(a non blank string) and No
"CableID footer" be displayed when the CableID field is blank. The solution
you gave me did not appear to work this way. Perhaps I did not implement it
correctly.