udskrivning af raport

Det kommer vel lidt an på hva din kode gør. Generere du din rapport fra en formular fx. via en knap eller hvordan?

jeg har en form hvor jeg printer raporten ud med følgende almindelige kode:
   
    Dim stDocName As String
    Dim stLinkCriteria As String
    stDocName = "Depositum"
    DoCmd.OpenReport stDocName, acViewPreview
    DoCmd.PrintOut acPrintAll, , , , 2
    DoCmd.Close

dernæst har min raport "Depositum" hvor jeg har vedlagt koden:

Private Sub Report_page()
With Access.Printers.Application.Printer
    .Orientation = acPRORPortrait
    .BottomMargin = 3
    .TopMargin = 3
    .LeftMargin = 2
    .RightMargin = 2
    .PrintQuality = acPRPQMedium
    .PaperBin = acPRBNLargeCapacity
    .Copies = 1
End With
End Sub

kan du ikke bare smide koden ind imellem

DoCmd.OpenReport stDocName, acViewPreview
...
DoCmd.PrintOut acPrintAll, , , , 2

næh det virker sku ikke umiddelbart hos mig :c(

hmm... lukker...

Lukketid :c)

gå ind under sideopsætning under raporten, og her har man mulighed for at lave det hele... ret simpelt...