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

ناقل

الخبراء
 عرض الملف الشخصي  عرض المشاركات

  • Posts

    607

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

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

  • Days Won

    3

 نوع المحتوي 

كل منشورات العضو ناقل

  1. ناقل
    حاولت انا ولم استطع .. 😅
  2. ناقل
    UP اين الاساتذة @Elsayed Bn Gemy و @sandanet
  3. ناقل
    UP
  4. ناقل
    السلام عليكم ورحمة الله وبركاته هل يمكن تحويل روابط التفعيل الموجودة في هذا البرنامج من الدروب بكس الى روابط قوقل درايف ؟؟؟؟؟؟؟ وكيف يتم ذلك ؟؟؟؟؟؟ اقصد هذا الرابط https://dl.dropboxusercontent.com/s/n702324j1aclxel/active1.txt?dl=0
  5. ناقل
    هل يمكن تعيين الطابعة الافرتراضية مباشرة من النموذج دون فتح لوحة التحكم؟؟؟؟؟
  6. ناقل
    🌷
  7. ناقل
    أخي بلال تم الاستيراد والتصدير كما هو في الصور ..... وضح ماذا تريد بالضبط مع الشرح
  8. ناقل
    ممكن مثال للقاعدة وملف الاكسل
  9. ناقل
    بعد اذنك استاذي ابا تراب هل هذا ماتريد صلاحيات المستخدم.rar
  10. ناقل
    النجاح والاكمال
  11. ناقل
    انظر هذا بعد التعديل ؟؟؟؟؟
  12. ناقل
    أنظر الصور هل هذا هو المطلوب قارنها بالنتيجة لديك ..... هل اخراج النتيجة صحيحة ؟؟؟؟؟؟؟؟
  13. ناقل
    Warning = MsgBox("أنت الآن على وشك حذف السجل الحالي فهل أنت واثق من رغبتك في الحذف", vbYesNo + vbQuestion, "تحذير") If Warning = vbYes Then DoCmd.SetWarnings (False) ضع الكود السابق هنا DoCmd.SetWarnings (True) Else DoCmd.CancelEvent End If
  14. ناقل
    اين الاجابة اخي الكريم ؟؟؟؟؟
  15. ناقل
    وعليكم السلام لحساب عدد الشيك استخدم هذا الكود =Sum(IIf([غياب]=-1;1;0)) وغياب هو اسم الحقل عندك لحذف السجلات المختارة استخدم هذا الكود CurrentDb.Execute "DELETE * FROM L WHERE [غياب] = true" Me.Requery حيث L هو اسم الجدول لديك
  16. ناقل
    ممكن كدا .... R_MultiHead.accdb R_MultiHead.accdb
  17. ناقل
    عيدك مبارك يعني المطلوب اخفاء ت1 مثلا واظهار ت2 وهكذا .... وضح لو تكرمت
  18. ناقل
    اضف تلك البنود في رأس التقرير وليس رأس الصفحة
  19. ناقل
    "DoCmd.OpenReport "report name
  20. ناقل
    استبدلها بهذا If Vn1 = 0 Then Me.K1.Visible = False End If كودك بعد التعديل .... On Error Resume Next If Vn1 = 0 Then Me.K1.Visible = False End If If Vn2 = 0 Then Me.K2.Visible = False End If If Vn3 = 0 Then Me.K3.Visible = False End If If Vn4 = 0 Then Me.K4.Visible = False End If If Vn5 = 0 Then Me.K5.Visible = False End If
  21. ناقل
  22. ناقل
    لم تظهر الرسالة عندي انظر ..... متى تظهر الرسالة
  23. ناقل
    طريقة اخرى مع طرق المبدع @jjafferr ممكن تضع مصدر مربع النص هذا الكود .... على افتراض ان مربع النص الذي يظهر فيه عبارة الخميس والجمعة هو a =IIf([a]="الخميس" Or [a]="الجمعة";"عطلة رسمية")
  24. ناقل
    وعليكم السلام تفضل .... New Microsoft Access قاعدة بيانات (3).accdb
  25. ناقل
    جرب هذا ...... If Mid(Me.text1, 1, 1) = 7 And InStr(Me.text2, 7) > 0 Then MsgBox "الرقم الأول" ElseIf Mid(Me.text1, 2, 1) = 7 And InStr(Me.text2, 7) > 0 Then MsgBox "الرقم الثاني" ElseIf Mid(Me.text1, 3, 1) = 7 And InStr(Me.text2, 7) > 0 Then MsgBox "الرقم الثالث" End If
×
×
  • اضف...

Important Information

  I accept