طباعة التقارير المختاره فقط بناءا على Checkbox

[Emad Fawzy Armanious]

السلام عليكم أعضاء المنتدى المحترمين

عندي قاعدة بيانات فيها جدول يحتوى على على كل أسماء التقارير في قاعدة البيانات وفيه نموذج بيعرض أسماء التقارير بناء على إستعلام يحدد مجموعة من التقارير ومقابل كل سجل في النموذج يوجد Check Box

المطلوب هو عمل زر امر به كود يطبع التقارير التي تم إختيارها بناء على ال Check Box

على سبيل المثال لو تم اختيار ثلاث تقارير عن الضغط على زر الأمر يطبع الثلاث تقارير المختاره . لو تم إتيار خمس تقارير عن الضغط على زر الأمر يطبع الخمس تقارير المختاره

أرجوا المساعده 

[jjafferr]

وعليكم السلام 🙂

 

بالمعلومات اللي عندنا ، تفضل :

	dim rst as dao.recordset
	dim RC as integer
	dim i as integer

	set rst=me.recordsetclone
	rst.movelast:rst.movefirst:RC=rst.recordcount

	docmd.gotorecord,,acfirst

	for i=1 to RC
	
		if me.YesNoField =-1 then

			docmd.openreport me.ReportName
		end if

		docmd.gotorecord,,acnext
	next i

	rst.close: set rst=nothing

 

جعفر

[Emad Fawzy Armanious]

اقتباس

شكر ا جزيلا jjafferr أنا طبقت الكود اللى ارسلته حضرتك بس بيظهر أول تقرير فقط ممكن حضرتك تعدل عليه مرفق نسخة من الملف

 

Print multiple Reports.accdb

[مسفر]

جرب الان 

 

Print multiple Reports.rar

لم أقرأ السؤال جيدا ولكن عند التحميل رأيت خطأ فعدلته 

ساعود إن امكنني ذلك 

[jjafferr]

 

منذ ساعه, Emad Fawzy Armanious said:

بس بيظهر أول تقرير فقط

 

نعم ، لأنه لا يمكن معاينة اكثر من تقرير في نفس الوقت ،

لهذا السبب الكود اللي اعطيتك يطبع مباشرة 

 

جعفر

 

[Emad Fawzy Armanious]

شكر أخ جعفر