compile ile modulde şu kodda hata veriyor "rpt" kelimesinde "variable not defined" hatası veriyor. bu "rpt" sadece burada kullanılmış bunun dim ile tanimlarsak typi ne olmalı

Public Sub PrinterSides(ByVal pyNum As Byte)

   'acPRDPSimplex = 1

   'acPRDPHorizontal =  2

   'acPRDPVertical = 3

   Select Case pyNum

    Case ": 'nothing to do"

    Case 1

       rpt.Printer.Duplex = acPRDPSimplex

    Case 2

       rpt.Printer.Duplex = acPRDPHorizontal

    Case 3

       rpt.Printer.Duplex = acPRDPVertical

   End Select

   Printer.Duplex = pyNum

End Sub