Printable View
با سلام خدمت دوستان عزیز
من یک گزارش دارم که شامل یک ساب ریپروت هست و میخام با یک چک باکس تعیین بشه که تو گزارش نهایی ساب ریپورت نمایش یا عدم نمایش داشته باشه
لطفا راهنمایی بفرمایید
توی فرم با کد زیر میشه ولی توی ریپورت کار نکرد متاسفانه
Private Sub Opt1_AfterUpdate()
If Me.Opt1 = True Then
Form_ّForm1.ّForm1_S.Visible = True
Else
Form_ّForm1.ّForm1_S.Visible = False
End If
End Sub
شاید در print preview این کار رو میکنین،
باید در report view باشه.
بله حق با شماست ولی در ریپورت کجا باید این کد تعریف بشه؟
کد رو که قبلا نوشتین،
کافی هست ریپورت رو در حالت report view باز کنین.
اگر ریپورت رو با کد باز میکنین شبیه حالت زیر میشه:
docmd.openreport "....",acpreview
ممنونم ولی اشکال اینجاست که اون فرمول تو رویداد after upate یک چک باکس تعریف شده د رحالیکه د ر report رویداد after update وجود نداره ضمن اینکه در نهایت پرینت گزارش مهمهنقل قول:
نوشته شده توسط mazoolagh
کافی هست وضعیت چک باکس رو به ریپورت بفرستین و در خود ریپورت با توجه به مقدار چک باکس ، visibility ساب ریپورت رو مشخص کنین:
' direct print
docmd.openreport "...." ,,,,, me.opt1
' report view
docmd.openreport "...." ,acreportview,,,, me.opt1
و در رخداد report_open کد زیر رو بگذارین:
me.sub_report.visible=cbool(me.openargs)
یا اینکه مستقیما از داخل ریپورت وضعیت چک باکس رو بخونین:
me.sub_report.visible=cbool(forms!form_name.opt1)
بسیار ممنون انجام شدنقل قول:
نوشته شده توسط mazoolagh
سلامنقل قول:
نوشته شده توسط mazoolagh
ممکنه با ذکر یک مثال خصوصیت OpenArgs برای فرم یا گزارش رو قدری توضیح دهید و بفرمائید در چه شرایطی باید از این خصوصیت استفاده کرد ؟
نمونه با توضیحات زیاد هست:
آموزش: rss readr - خواندن فایل های xml و بیرون کشیدن دیتا از آن (barnamenevis.org)
فیلتر کردم فرم قبل از باز کردن آن (barnamenevis.org)
سوال: عدم ارسال اطلاعات فلیدی از یک فرم لیست به فرم A یا فرم B (barnamenevis.org)
سوال: مشکل در اجرای کوئری با چندین شرط (barnamenevis.org)
و ....