نجوم المشاركات

السلام عليكم الإخوة الأفاضل في هذا المنتدى الجميل سبق لي وأن طرحت موضوع مشابه لهذا الموضوع: وهو إنشاء تقرير مصمم في ورقة A3 وطباعته في ورقة A4 وقد حصلت على الإجابة الكافية. في موضوعي هذا وهو أنني صممت تقريرا وقد فاق التقرير حجم ورقة A3 حوالي 49 سم وربما يزيد بقليل أحيانا الحقول كثيرة وهي تمثل علامات الطلاب (لا يمكن تصميم التقرير في حجم ورقة A3 لانه لا يمكن احتواء جميع الحقول وهي مصممة بشكل عمودي وحسب المطلوب ) (جعل التقرير مصمم في ورقة A3 مستبعد) السؤال هو كيف يمكن طباعة هذا التقرير المصمم في ورقة أكثر من حجم ورقة A3 في ورقة A4 لأني في موضوعي السابق إذا كان التقرير مصمم في ورقة A3 تمكنت من الطباعة في A4. إما الآن في حالة إذا كان التقرير مصمم في ورقة أكثر من A3 : هل توجد طريقة أو كود للطباعة في ورقة A4 في EXCEL توجد طريقة وهي تصغير نسبة حجم الورقة للتعامل مع هذه المشكلة كما في الصورة المرفقة (تصغير حجم الورقة إلى 66 بالمئة لنتمكن من الطباعة في ورقة A4 الرجاء المساعدة والتوجيه وبارك الله فيكم

شكرا من القلب على المجهود الراقي يا راقي اصبت العمل جدا صحيح بارك الله بيك استاذي

السطر الأخضر الموجود فيه الأرقام 1 2 3 4 ..... مهم جدا , لو تم تغيير الأرقام ستختلف النتائج اضغط على فصل2 ولاحظ النتيجة تفضل 3صل كلمات وأرقام.xlsb

تفضل استاذ @ابو هاله النبلسي المرفق . ووافني بالرد . DDNabulsi-1.rar

لا تبخل علينا في ملف مرفق يحتوي تقرير مماثل لما وصفته ( لا يشترط الجداول ولا اي نماذج )

شرحت لك طريقة بدون اكواد تستطيع من خلالها طباعة حجم A3 على ورقة A4 شاهد الفيديو https://www.mediafire.com/file/0mcf3xnnzpgxa59/WhatsApp_Video_2025-03-02_at_4.42.49_PM.mp4/file

جمع اقساط للاسماء المتشابهة.xlsm

اضغط على زر النتيجة الأحمر ولاحظ النتيجة تفضل جمع اقساط.xlsm

وعليكم السلام ورحمة الله وبركاته ،، من مشروع قديم ، جرب هذا الكود في زر . مع العلم أنني لم أصل الى حجم الورقة A2 مثلاً Dim rpt As Report DoCmd.openReport "Report4", acViewPreview Set rpt = Reports("Report4") rpt.Printer.PaperSize = acPRPSA4 rpt.Printer.LeftMargin = 200 rpt.Printer.RightMargin = 200 rpt.Printer.TopMargin = 200 rpt.Printer.BottomMargin = 200 DoCmd.PrintOut DoCmd.Close acReport, "Report4", acSaveNo

بداية كل الاحترام لكم واخص استاذنا ابو خليل هل ممكن نسخة 2007

ابشر

السلام عليكم مبارك عليكم الشهر مشاركه مع اخى واستاذى @kkhalifa1960 جزاه الله عنا خيرا اتفضل اخى @ازهر عبد العزيز ان شاء الله يكون ما تريد ع حسب ما فهمت من كلامك فان كان ما تريد اوضحت لك خطوات التعديل ان لم يكن فلعلك تشرح باسهاب حتى يستطيع اخوانك مساعدتك قم بالضغط ع الزر لللانتقال الى سجل جديد بالتوفيق borrow_1.accdb

تفضل استاذ @ازهر عبد العزيز المرفق بعد التعديل بطلبك حسب مافهمت . ووافني بالرد . borrow.rar

تفضل استاذ @ازهر عبد العزيز المرفق بعد التعديل بطلبك حسب مافهمت . ووافني بالرد . borrow.rar

كنت اظن ان هذا هو الحل المناسب ، حيث فهمت من مشاركتك الاخيرة الرضا الآن .. ما المشكلة وما المطلوب ؟

السلام عليكم استاذ عبد اللطيف DeepSeek ليس بأمكانية chatGpt المدفوع الثمن ...واعتقد ان اشتراكه 20 دولار شهريا وهو بارع في البحوث العلمية

وعليكم السلام : الطريقة من خطوتين : الخطوة الأولى : أن ترسل نموذج من الملف لأنه لا يمكن التخمين على شيء غير موجود لا بد أن نعرف في أي عمود تتواجد الأسماء وهل تم إدخالها يدويا أم عن طريق قائمة منسدلة أم ... أم , والمبالغ في أي عمود ؟؟؟؟؟؟ كل هذه تساؤلات لا يمكن العمل معها الخطوة الثانية : إذا تم إزالة كل المشاكل سيتم بناء كود يحسب مطلوبك تقبل تحياتي , و مبارك عليك الشهر (رمضان1446هـ)

باعتقادي وعن نفسي أن فكرة كومبوبوكس في الجدول غير ذكية . لكن سأنفذ فكرتك في الملف الذي ارسلته بأقرب فرصة إن شاء الله 😇 .

مشاركه مع اخى العزيزمحمد @Barna اخى @ازهر عبد العزيز استخدم داله IsNumeric للتحقق اذا كان رقم ام لا بالتوفيق