G
Guest
Hello all,
In my reports I have replaced the default report header label with an
unbound text box named "txtCustomer". It's purpose is to provide customized
page headers depending on values selected from a form. This works correctly
when viewing within Access, but when I send it to my printer nothing prints.
In the "On Format" section of the report header I have the following
procedure:
Option Compare Database
Private Sub ReportHeader_Format(Cancel As Integer, FormatCount As Integer)
Dim Title As String
Title = "Product Type Listing for "
Me.txtCustomer = Title & Forms![Application Form]!ProductType.Value + "'s"
End Sub
In my reports I have replaced the default report header label with an
unbound text box named "txtCustomer". It's purpose is to provide customized
page headers depending on values selected from a form. This works correctly
when viewing within Access, but when I send it to my printer nothing prints.
In the "On Format" section of the report header I have the following
procedure:
Option Compare Database
Private Sub ReportHeader_Format(Cancel As Integer, FormatCount As Integer)
Dim Title As String
Title = "Product Type Listing for "
Me.txtCustomer = Title & Forms![Application Form]!ProductType.Value + "'s"
End Sub