gillianleec
Technical User
I have a subreport that has an On Activate event that changes the fontsize depending on the number of records. It works great when I run the subreport but does not work when I run the report.
Private Sub Report_Activate()
Select Case Me.Countrec
Case Is > 4
Me.txtdocname.FontSize = 5
Case Is <= 4
Me.txtdocname.FontSize = 8
End Select
End Sub
Private Sub Report_Activate()
Select Case Me.Countrec
Case Is > 4
Me.txtdocname.FontSize = 5
Case Is <= 4
Me.txtdocname.FontSize = 8
End Select
End Sub