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

الردود الموصى بها

قام بنشر

السلام عليكم

لدي حقل اسمه القسم  و حقل اسمه رقم الفوج 

اريد عند اختيار اسم القسم والفوج يقوم بضغط على الزر اضافة فوج 

وعندما يكون حقل القسم  و حقل رقم الفوج لم يتم اضافة الفوج

ويوجد زر حدف اريد عند الضغط على زر الحدف يتم تلوين الحقول

الافواج.accdb

قام بنشر
23 دقائق مضت, بلال اليامين said:

السلام عليكم

لدي حقل اسمه القسم  و حقل اسمه رقم الفوج 

اريد عند اختيار اسم القسم والفوج يقوم بضغط على الزر اضافة فوج 

وعندما يكون حقل القسم  و حقل رقم الفوج لم يتم اضافة الفوج

ويوجد زر حدف اريد عند الضغط على زر الحدف يتم تلوين الحقول

الافواج.accdb 644 kB · 1 download

سامحني
بس مش عارف حاسس انى مش فاهمك 🤪

انت عاوز يعنى اذا تحق الشرط باختيار القيم والفوج يقوم تلقائيا بتفعيل الزر ولا يقوم بتنفيذ التعليمات البرمجيه التى بالزر ولا ايه قول بسرعه 🤣

قام بنشر

لحد ما ترد
هفترض انك تريد كود vba علشان تضيف البيانات التى تختارها من القوائم على الجدول

ولفعل هذا

راجع الكود التالي

'هنا نبدأ الاول التحقق من اذا كان الحقول المطلوبه فارغه ام لا
If SectionList = "" Or IsNull(SectionList) Then
MsgBox "برجاء اختيار القسم اولا", vbCritical, "تنبيه"
SectionList.SetFocus
SectionList.Dropdown
Exit Sub
End If
If FojList = "" Or IsNull(FojList) Then
MsgBox "برجاء اختيار الفوج اولا", vbCritical, "تنبيه"
FojList.SetFocus
FojList.Dropdown
Exit Sub
End If

'بعد ما تم التحقق بنجاح وكل الامور تمام يتم تخزين القيمة فى الجدول المستهدف
Dim db As DAO.Database
Dim rst As DAO.Recordset
Set db = CurrentDb
Set rst = db.OpenRecordset("تحديد الفوج", dbOpenDynaset)
With rst
    .AddNew
    ![mrk] = FojList
    ![الرقم2] = SectionList
    .Update
    .Close
End With
Set rst = Nothing
db.Close
Set db = Nothing

'بعد ما تم التخزين
'يتم تفريغ الحقول لعملية اخري
SectionList = Null
FojList = Null

'هنا نعمل تحديث للفورم
Me.Form.Requery

 

قام بنشر
43 دقائق مضت, بلال اليامين said:

السلام لقد حاولت ولم اسطيع يظهر لي الاخطأ

أخي @بلال اليامين ، انت حاولت في الحل ، ولم تحاول حتى توضيح المطلوب كما أشار أستاذنا @عمر ضاحى في مشاركته .

قام بنشر

أخي بلال أود المساعدة فعلاً ، ولكني لم أفهم المطلوب بشكل واضح للأسف .. :excl:

ولكن طريقة تصميمك للجداول أعتقد أنها بحاجة إلى إعادة النظر بأمرها ..
فمثلاً القيم ( تحضيري ، أولى .... خامسة ) اعتقد يجب ان تكون في جدول مستقل مع ترقيم لكل سجل .
وكذلك الأمر لحقل الفوج إن كان كما هو واضح في الجدول تحديد القسم أن (تحضيري يقابلها 1) ، و (أولى يقابلها 2) ... إلخ
اهتم بالمسميات أيضاً التي مثل ( mdd,mr,,rr,,rk .... إلخ )

 

أعانك الله على الشرح الوافي ليتضح المطلوب ويصبح ذا معنى مفهوم ، ومتأكد إنك ستجد الإجابة المناسبة :yes:

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information