Moosak

تفضل أخي @حامل المسك 🙂 الحاق البيانات.accdb

عندي لم تظهر صفحات فارغة .. وسبب ظهورها على ما أعتقد هو عملية نقل البرنامج بين الأجهزة واختلاف إعدادات الطابعة الافتراضية .. والحل إما أن يتم تعديل تنسيق التقرير حسب الطابعة الافتراضية في جهازك ( وهذا غير عملي في حال تنقل البرنامج بين الأجهزة ) .. وإما أن يتم ضبط إعدادات التقرير على طابعة محددة فتبقى الإعدادات نفسها في كل الأجهزة .. 🙂

هناك حيلة صغيرة يا أخي @waledstar سأعلمك إياها بدون الحاجة لبرامج خارجية 🙂 بعد أن تقوم بتصميم جميع التقارير قم بتصميم تقرير تجميعي .. بحيث تجمع فيه كل التقارير على شكل تقارير فرعية .. وثم تفصل بينها بأداة فاصل الصفحات () .. فيظهر لك الشكل النهائي بهذه الطريقة : بعدها تقوم بتصدير التقرير التجميعي على صيغة PDF فيحصل المطلوب ☺️ وهذا مثال للطريقة : Many Reports in 1 PDF.accdb

وعليكم السلام أخي بلال 🙂 تفضل : البرنامج .rar

هذي دمها عسل زيك لأ بجد .. تتأخر معاي دقيقة كاملة

لله درك يا @ابو جودي رجل المهمات الصعبة 😉💪 حلوة جدا .. بس تتأخر حبتين .. 😏 يعني تبدأ تقفل بعد دقيقة تقريبا .. إلى المكتبة العامرة بالأكواد 😁✌️

نعم هي رسائل متتالية تضغط موافق لتختفي وتفتح لك الرسالة الثانية فالثالثة وهكذا .. الفكرة : رسائل ذاتية الاختفاء ، تختفي لتظهر الأخرى ..

قمت الآن بتعديل المرفق .. عملت فكرة ثانية 🙂 هنا ستدخل في مسألة هل يمكن عمل رسائل ذاتية الاختفاء 🙂 .. ولكن للأسف ليس لدي فكرة ..

وعليكم السلام ورحمة الله وبركاته أخي عمر 🙂 هذا حسبما فهمت .. عملت فكرتين .. ضع هذا الكود في حدث عند الإغلاق : Private Sub Form_Close() Dim x As Integer '----------------------------------------------(الفكرة الأولى) DoCmd.GoToRecord , , acFirst For x = 1 To Me.Recordset.RecordCount MsgBox Me.n DoCmd.GoToRecord , , acNext Next '----------------------------------------------(الفكرة الثانية) Dim txt As String DoCmd.GoToRecord , , acFirst For x = 1 To Me.Recordset.RecordCount txt = txt & Me.n & vbNewLine DoCmd.GoToRecord , , acNext Next MsgBox txt End Sub aa.accdb

وحشتنا ياباش مهندس @ابو جودي 🙂

وعليكم السلام ورحمة الله وبركاته .. 🙂

" إذا عُرِفَ السبب بطل العجب " أول ما تبادر لذهني بعد قرائتي للموضوع : ما الهدف من ذلك ؟ والجواب عن هذا السؤال هو ما سيفتح لنا باب الحل المناسب🙂

وهذه طريقة أخرى بدون استخدام التايمر 🙂 Process Par.accdb

شكرا جزيلا لك أخي @kanory 🙂🌷🌸 سعيد جدا أنك استفدت منها 😊🌹

ولا أنا 😅✋🏻