مساعده فى تحديث بيانات حقل

[ahmad2026]

 لدى عمودين فى جدول الحقل الاول فيه بيانات  الدرجه  وهى ( الاولى تنميه اداريه ( ب ) )  اريد ان  الحقل الثانى ياخل كلمة الاولى فقد من الحقل السابق  هل ممكن  ولكم جزيل الشكر 

[ناقل]

جرب هذا التحديث مع تعديل اسماء الحقول لديك

UPDATE اسم_الجدول
SET اسم_الحقل_الثاني = Left([اسم_الحقل_الأول], InStr([اسم_الحقل_الأول], " ") - 1);

 

[kkhalifa1960]

لو تقصد الحقل الثاني محسوب بالجدول  مايصير  ..........  أما من خلال نموذج فممكن وكما اشار اليك استاذ @ناقل  ..................... تفضل الشرح والمرفق . ووافنا بالرد .

                                                                                                                

ahmad2026.rar

[ahmad2026]

اشكركم على سرعة الرد نعم هو المطلوب ولاكن اريد بعض التحديثات عليها 

  محتاج انها تكون بدون زر   تعمل من تلقاء نفسها  عند تحديث حقل الدرجه 

لكم جزيل الشكر 

 

[منتصر الانسي]

12 ساعات مضت, ahmad2026 said:

  محتاج انها تكون بدون زر   تعمل من تلقاء نفسها  عند تحديث حقل الدرجه 

بعد إذن الآخ @kkhalifa1960 قمت بتعديل المثال ليقوم بتنفيذ الطلب

ولكن لدي ملاحظة مهمة كل الحلول الواردة هنا تتعامل على أن العبارة المراد إجتزاؤها تتكون من كلمة واحدة بمعنى إذا كانت الدرجات مابين (الأولى والعاشرة) فهذه الحلول ستفي بالغرض ولكن لو كانت هناك درجات أعلى مثل (الحادية عشر أو السابعة عشر) فهذا يحتاج لمعالجة أخرى لهذا وجب التنويه

تحياتي

ahmad2026.rar

[kkhalifa1960]

منذ ساعه, منتصر الانسي said:

العبارة المراد إجتزاؤها تتكون من كلمة واحدة بمعنى إذا كانت الدرجات مابين (الأولى والعاشرة) فهذه الحلول ستفي بالغرض ولكن لو كانت هناك درجات أعلى مثل (الحادية عشر أو السابعة عشر) فهذا يحتاج لمعالجة أخرى لهذا وجب التنويه

استاذنا @منتصر الانسي طبعاً لا تفوتنا وبما ان الطالب مصري فالدرجات بمصر أقل من أوتساوي التاسعة على ما أذكر .   ولو الطالب عاوز انا حاضر ..................

 

13 ساعات مضت, ahmad2026 said:

محتاج انها تكون بدون زر   تعمل من تلقاء نفسها  عند تحديث حقل الدرجه

تفضل .  الشرح والمرفق بعد التعديل .ووافني بالرد.      

ahmad2026-111.rar

[ahmad2026]

عظيم لكم جزيل الشكر والاحترام   فعلان  خير الناس انفعهم للناس

 

ممكن اطمع فى شرح لداله  like  مع الامثله وجزاك الله خيرا 

تم تعديل منذ 14 ساعات بواسطه ahmad2026

[kkhalifa1960]

13 ساعات مضت, ahmad2026 said:

ممكن اطمع فى شرح لداله  like  مع الامثله وجزاك الله خيرا 

* وظيفة LIKE

• تستخدم لمقارنة النصوص مع نمط (Pattern) معيّن.

• النمط يحتوي على رموز خاصة (Wildcards) تسمح بالبحث الجزئي أو المرن داخل النصوص.

                                                                             

* أمثلة عملية في VBA

Dim txt As String
txt = "Mahdi"

' مثال 1: البحث عن نص يبدأ بـ "M"
If txt Like "M*" Then
    MsgBox "يبدأ بحرف M"
End If

' مثال 2: نص مكون من 5 أحرف بالضبط
If txt Like "?????" Then
    MsgBox "النص يحتوي على 5 أحرف"
End If

' مثال 3: نص ينتهي بـ "di"
If txt Like "*di" Then
    MsgBox "ينتهي بـ di"
End If

' مثال 4: نص يحتوي على رقمين متتاليين
Dim code As String
code = "AB12"
If code Like "*##" Then
    MsgBox "ينتهي برقمين"
End If