Hallo allen,
Het is geen vraag maar meer een tip voor de rest.
Ik wilde een rapport openen en gelijk printen vanuit een bepaalde lade (de user kan geen lade selecteren daar ik dit heb beveiligd (lint en opties zijn verborgen))
Nu is het zo dat als hij print, gewoon de default printerinstellingen pakt. Echter is dit voor bijv etiketten of enveloppen erg onhandig.
Met deze code kan je prima een andere lade selecteren.
Deze code start ik met een button op een formulier.
Hij opent het rapport, print hem volgens de gemaakte instellingen en sluit hem weer.
Waar acPRBNManual staat, kan je een aantal andere parameters invullen, te weten:
acPRBNAuto
acPRBNCassette
acPRBNenvelope
acPRBNEnvManual
acPRBNLargeCapacity
acPRBNLargeFmt
acPRBNLower
acPRBNManual
acPRBNMiddle
acPRBNSmallFmt
acPRBNTractor
acPRBNUpper
acPRBNFormSource
Wat het precies is, zou je even moeten proberen.
Handmatige invoer hier is acPRBNManual
Wellicht zijn jullie ermee geholpen.
Het is geen vraag maar meer een tip voor de rest.
Ik wilde een rapport openen en gelijk printen vanuit een bepaalde lade (de user kan geen lade selecteren daar ik dit heb beveiligd (lint en opties zijn verborgen))
Nu is het zo dat als hij print, gewoon de default printerinstellingen pakt. Echter is dit voor bijv etiketten of enveloppen erg onhandig.
Met deze code kan je prima een andere lade selecteren.
Deze code start ik met een button op een formulier.
Hij opent het rapport, print hem volgens de gemaakte instellingen en sluit hem weer.
Code:
Private Sub Etiket_Print_Click()
Dim rpt As Report
DoCmd.OpenReport "naam_rapport", acViewPreview
Set rpt = Reports("naam_rapport")
rpt.Printer.PaperBin = [B]acPRBNManual[/B]
DoCmd.PrintOut acPrintPage, 1, 1, acHigh, 1
DoCmd.Close acReport, "naam_rapport", acSaveNo
End Sub
Waar acPRBNManual staat, kan je een aantal andere parameters invullen, te weten:
acPRBNAuto
acPRBNCassette
acPRBNenvelope
acPRBNEnvManual
acPRBNLargeCapacity
acPRBNLargeFmt
acPRBNLower
acPRBNManual
acPRBNMiddle
acPRBNSmallFmt
acPRBNTractor
acPRBNUpper
acPRBNFormSource
Wat het precies is, zou je even moeten proberen.
Handmatige invoer hier is acPRBNManual
Wellicht zijn jullie ermee geholpen.