تنظیم صفحه گزارش

سلام
من می خواهم وقتی یک گزارش طراحی میکنم اندازه صفحه گزارشم طوری باشد که به اندازه کاغذ A4 یا A5 باشد چطوری اینکارو انجام بدم؟
ممنونم دوستان

گزارش رو در نمای طراحی باز کن بعد از page setupسایز گزارشت رو انتخاب کن

می تونی هنگام باز شدن گزارشت این دستور را استفاده کنی و سایز های صفحه استاندارد را انتخاب کنی

Private Sub Report_Open(Cancel As Integer)

Printer.PaperSize = acPRPSA4

End Sub

راستی کسی میدونه چطور میشه یک صفحه با سایز دلخواه مثلا 4*5 س ایجاد کرد ؟ البته از طریق کد !

نقل قول:

---

نوشته شده توسط hbahjat

می تونی هنگام باز شدن گزارشت این دستور را استفاده کنی و سایز های صفحه استاندارد را انتخاب کنی

Private Sub Report_Open(Cancel As Integer)

Printer.PaperSize = acPRPSA4

End Sub

راستی کسی میدونه چطور میشه یک صفحه با سایز دلخواه مثلا 4*5 س ایجاد کرد ؟ البته از طریق کد !

---

ببین این کد به دردت میخوره (از راهنمای خود accessبرداشتم)

Sub SetPrinter(strFormname As String)

DoCmd.OpenForm FormName:=strFormname, view:=acDesign, _
datamode:=acFormEdit, windowmode:=acHidden

With Forms(form1).Printer

.TopMargin = 1440
.BottomMargin = 1440
.LeftMargin = 1440
.RightMargin = 1440

.ColumnSpacing = 360
.RowSpacing = 360

.ColorMode = acPRCMColor
.DataOnly = False
.DefaultSize = False
.ItemSizeHeight = 2880
.ItemSizeWidth = 2880
.ItemLayout = acPRVerticalColumnLayout
.ItemsAcross = 6

.Copies = 1
.Orientation = acPRORLandscape
.Duplex = acPRDPVertical
.PaperBin = acPRBNAuto
.PaperSize = acPRPSLetter
.PrintQuality = acPRPQMedium

End With

DoCmd.Close objecttype:=acForm, objectname:=strFormname, _
Save:=acSaveYes


End Sub
:لبخند::لبخند: