Type mismatch in function called in report OnOpen event

[Richard S.]

I have a public procedure from which the following is extracted:

Public Sub SetFontPrint(RptName As Report)
With RptName
.Text1.FontName = LabelFontName & ""
End With

The following call is in the report_open event:

SetFontPrint (Me)

I get a Type Mismatch error when invoking the procedure in the report. I'm
attempting at run-time to set font properties that are selected by the user
and stored in public variables (e.g., LabelFontName).

I will appreciate any help in resolving this problem.

Richard

 

[Beetle]

You need to invoke the Call statement;

Call SetFontPrint (Me)

 

[Douglas J. Steele]

For the sake of completeness, the alternative

SetFontPrint Me

should also work.

The problem is that without the Call keyword, putting parentheses around a
variable passes that variable ByVal, instead of the normal ByRef.

 

[Richard S.]

Thank you for the help.

For the sake of completeness, the alternative

SetFontPrint Me

should also work.

The problem is that without the Call keyword, putting parentheses around a
variable passes that variable ByVal, instead of the normal ByRef.