Data Report As Object in Function

Hello!
I made a Data Report and I want to print using DataReport.PrintReport False.
Even the report has many pages, it is print only first page. I tries to use rptRangeFromTo or rptRangeAllPages, but in vain.
If first show the report and then I print, all works fine.
Problem is because I send Data Report as a parameter to a function (rptReport as Object). Only in this case it prints only first page. Any idea to resolve the problem?
Can you help me?
Thanks a lot!