View Full Version : سوال: فراخوانی پنجره PageSetup
nazanin_90
جمعه 31 خرداد 1392, 11:15 صبح
سلام
برای گزارشی که از طریق یک فرم باز میشود چگونه میتوانیم پنجره PageSetup را برای تنظیم گزارش مربوطه فراخوانی کنیم؟
با تشکر
Abbas Amiri
جمعه 31 خرداد 1392, 19:12 عصر
سلام
برای گزارشی که از طریق یک فرم باز میشود چگونه میتوانیم پنجره PageSetup را برای تنظیم گزارش مربوطه فراخوانی کنیم؟
با تشکر
از دستور PrintOut استفاده کنید .
قالب کلی دستور:
DoCmd.PrintOut(PrintRange, PageFrom, PageTo, PrintQuality, Copies, CollateCopies
DoCmd.PrintOut acPages, 1, 4, , 2
nazanin_90
جمعه 31 خرداد 1392, 23:38 عصر
از دستور PrintOut استفاده کنید .
قالب کلی دستور:
DoCmd.PrintOut(PrintRange, PageFrom, PageTo, PrintQuality, Copies, CollateCopies
DoCmd.PrintOut acPages, 1, 4, , 2
سلام جناب امیری
منظورم ظاهر شدن پنجره PageSetup طبق تصویر ضمیمه است . این پنجره باکد زیر ظاهر میشود اما همرا با باز شدن گزارش ،به عبارتی باید فرمان اجرای گزارش و اجرای این پنجره باید با هم صورت بگیرد در صورتی که من می خواهم دو دستور را در رویداد کلیک دو کمند باتن قرار بدهم . اجرای گزارش در رویداد کلیک یک کمند باتن و دستور باز شدن پنجره فوق نیزدر رویدادکلیک یک کمند باتن دیگر.
باتشکر
DoCmd.OpenReport "reportname", acViewPreview, "", "", acNormal
DoCmd.RunCommand acCmdPageSetup
Abbas Amiri
شنبه 01 تیر 1392, 00:48 صبح
در رویداد Click باتن دوم تایپ کنید :
Private Sub cmdPageSetup_Click()
On Error Resume Next
DoCmd.SelectObject acReport, "YourReportName"
DoCmd.RunCommand acCmdPageSetup
End Sub
nazanin_90
شنبه 01 تیر 1392, 00:59 صبح
در رویداد Click باتن دوم تایپ کنید :
Private Sub cmdPageSetup_Click()
On Error Resume Next
DoCmd.SelectObject acReport, "YourReportName"
DoCmd.RunCommand acCmdPageSetup
End Sub
آفرین جناب امیری! :تشویق:
متشکرم
vBulletin® v4.2.5, Copyright ©2000-1404, Jelsoft Enterprises Ltd.