اذهب الي المحتوي
أوفيسنا

علي المصري

05 عضو ذهبي
  • Posts

    1498
  • تاريخ الانضمام

  • تاريخ اخر زياره

  • Days Won

    5

كل منشورات العضو علي المصري

  1. جرب المرفق بدون ماكرو ولكن عن طريق vba cost2016.rar
  2. جرب الطريقة الموجودة بالرابط التالي
  3. قم بعمل تحديث لنسخة الاوفيس الموجودة لديك إلى النسخة الخدمية SP1 Office 2010 SP1
  4. وجدت هذا الكود في احد المنتديات لعمل الرسالة بخط سميك bold أتمنى ان ينال اعجابكم Bold Message.rar
  5. جزاك الله اخي الأستاذ ابوخليل vbMsgBoxRight تعمل مع اكسيس 2013 vbMsgBoxRtlReading لا تعمل مع اكسيس 2013 جربتها على النسخة ذات الواجهة الانجليزية شكرا للجميع
  6. جرب الطريقة التالية PreTest 132.rar ممكن تتغلب عليها بعمل ثلاثة حقول للتاريخ في جدول الحركات يوم - شهر - سنة
  7. في التقرير اكتب مصدر حقل الشهر ومصدر حقل العام كما يلي =[Forms]![طباعة التقارير]![cboMonth] =[Forms]![طباعة التقارير]![cboYear] لتحصل على النتيجة المطلوبة إن شاء الله إذا تم كتابة الكود بالطريقة التالية Dim i As Integer For i = 1 To 12 cboMonth.AddItem (MonthName(i)) & " " & Year(Date) Next i End Sub فإنه يعطي الشهر مع السنة ( ولكن السنة الحالية )
  8. يمكنك كتابة الكود بالطريقة التالية Private Sub Command81_Click() With Me!settelment .SetFocus DoCmd.GoToRecord , , acNewRec End With Forms("customers").Form("settelment").Controls("settel_sum").Value = Me.TOT.Value End Sub الجزء With Me!settelment .SetFocus DoCmd.GoToRecord , , acNewRec End With يمكن اضافته مع الباقي
  9. هذا هو الكود الذي استخدمته في مثالك DoCmd.OutputTo acOutputReport, "Q", acFormatPDF, strPathAndfile, True شكرا على التنويه
  10. جرب الكود التالي اضغط على المبلغ كامل بعد وضع المؤشر في حقل المبلغ المسدد Private Sub Command81_Click() Forms("customers").Form("settelment").Controls("settel_sum").Value = Me.TOT.Value End Sub اما بالنسبة للمبلغ الاخر تم إضافة نموذج لاستخدامه في ذلك انظر المرفق Database1.rar مع المبلغ الذي قيمته 100 يمكن كتابة الكود كما يلي Forms("customers").Form("settelment").Controls("settel_sum").Value = 100 وبالمثل الباقي
  11. تفضل طلبك اكتب اسفل حقل ما تم دفعه في المعيار >0 أكبر من صفر Aziz3.rar
  12. ان شاء الله بحاول هذه الأيام تعديل البرنامج واضافة بعض الإضافات البسيطة وتحويل البرنامج لكي يعمل مع كل من Access 32bit و Access 64bit ان شاء الله سوف اضيف التحصيل الاكاديمي له فيما بعدا ولكن التحصيل الاكاديمي يختلف من دولة إلى دولة وهذا في حد ذاته تحدي
  13. هل هذا هو المطلوب لاحظت انه هناك ولي امر رقم 1 مثلا له 3 أبناء وولي امر رقم 1 له ابن واحد ؟؟؟؟!!!!!!!!!!!!!! Aziz222.rar
  14. السلام عليكم ورحمة الله وبركاته ليه يتم استخدام برامج خارجية لما ممكن نعمل نفس الشيء باستخدام الاكواد انا بستخدم الكود التالي DoCmd.OutputTo acOutputReport, "Q", acFormatPDF, , True, , , acExportQualityPrint
  15. السلام عليكم ورحمة الله وبركاته لدي قاعدة البيانات الخاصة بي ( المتابعة اليومية للطلاب ) قمت بتحويلها إلى Access 64 bit و واجهتني مشكلة في احد الأكواد الخاصة بتغير شعار المدرسة مرفق الجزء الموجود به المشكلة مع احترامي للجميع اريد تحويل الكود لكي يعمل على Access 64 bit شكرا جزيلا AliElmasry.rar
  16. اكتب الكود الذي تستخدمه من فضلك
  17. اذا كان من الإمكان وضع نسخة مفتوحة المصدر لكي يستفيد الجميع من طرق البرمجة والتصميم
  18. هذا الكود عند العمل على اكسيس 64 بت لا يعمل هل من تعديل شكرا
  19. Private Sub Command0_Click() DoCmd.OpenReport "تقرير الطبع الكلي", acViewPreview, , , acHidden DoCmd.SelectObject acReport, "تقرير الطبع الكلي" DoCmd.PrintOut acSelection, , , , 2 DoCmd.Close acReport, "تقرير الطبع الكلي" End Sub
  20. للأسف اخي الكريم لم استطع التوصل للسبب حتى الآن
  21. الطريقة موضحة بالصورة SELECT customers.c_name, drivers.driver_name, suppliers.sup_name FROM customers, drivers, suppliers GROUP BY customers.c_name, drivers.driver_name, suppliers.sup_name;
×
×
  • اضف...

Important Information