QUOTE (doctor9 @ May 7 2012, 04:10 PM)

Mike,
Well, so far it sounds okay. Can you copy/paste the contents of the report's code module? It should include three fairly short sections.
After you paste them into a message, highlight them and click the "Wrap in Code Tags" button (the far right one) just above the white text area.
Dennis
Sure, here you go...
In the Report On Open Event I've got
CODE
Private Sub Report_Open(Cancel As Integer)
Call LabelSetup
End Sub
As mentioned, the original article asked for
CODE
=LabelSetup()
, but when I entered that, it was immediately highlighted in red and wouldn't run.
Then in the Report Header On Format Event I've got
CODE
Private Sub ReportHeader_Format(Cancel As Integer, FormatCount As Integer)
Call LabelInitialize
End Sub
Same comment about the function call, where I had to change the "=" to "Call"
Finally in Report Detail On Print Event I've got
CODE
Private Sub Detail_Print(Cancel As Integer, PrintCount As Integer)
Call LabelLayout(Reports![MyLabels])
End Sub
And again, same comment about the function call. Thanks!