اضافة خاصية تحسس التعديل على البيانات في الفورم

[nicola]

السلام عليكم ورحمة الله تعالى وبركاتة

تحية وشكر لاساتذة المنتدى واعضائه

 

 

 

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

على البيانات المستدعات حيث اذا تم تعديل على البيانات المستدعاة يتم تفعيل زر حفظ التعديل 

 

الهدف من هذا الكود 

هوا ان لدي فورم يحتوي على العديد من البيانات المستدعاة  وقد تحتاج الى تعديل من فترة الى اخرة 

واريد طريقة تساعد في تاكيد عملية حفظ التعديلات حيث اذا تم تعديل على البيانات يتم تفعيل الزر للدالة على انة تم تحديث بيانات 

 

 

المرفق يحتوي على التفاصيل 

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

اضافة خاصية تحسس التعديل على البيانات في الفورم .rar

[nicola]

للرفع

[يوسف السيد]

اعتقد ان هذا الرابط سيفيدك كثيرا http://www.officena.net/ib/index.php?showtopic=45637&page=3
وهو للأخ الفاضل : حمادة عمر

[nicola]

شكرك لك اخي يوسف 

ولكني لست اعاني من مشكلة استدعاء البيانات والتعديل عليها

 

الفكرة التي اريدها هي تحسس اذا طرء تعديل على البيانات المستدعات

وهذة الفكرة  مستمدة من عمل  للاستاذ القدير عبد الله باقشير

باسم (فورم بحث و تصفية بامكانية التعديل مرن لكل المستخدمين)

والصورة توضح 

حيث ان زر التعديل يتم تفعيلة عندما يحدث تعديل على البيانات المستدعاة

تم تعديل مارس 11, 2013 بواسطه nicola

[حمادة عمر]

السلام عليكم

الاخ الكريم / nicola

 

تفضل اخي المطلوب بالمرفق

ان شاء الله به طلبك علي حسب ما فهمت من طلبك

جزاك الله خيرا

 

 

اضافة خاصية تحسس التعديل على البيانات في الفورم1.rar

[nicola]

اخي الكريم حمادة عمر

مشكور على مساهمتك 

ولكن المشكلة في فكرتك انها حساسة للتغير الذي يطرا على التكست بوكس او الكمبو بكس 

وانا اريد ان تكون حساسة للتغير الذي يطرا على البيانات 

 

 الفكرة التي اريدها هي تحسس اذا طرء تعديل على البيانات المستدعات

وهذة الفكرة  مستمدة من عمل  للاستاذ القدير عبد الله باقشير

باسم (فورم بحث و تصفية بامكانية التعديل مرن لكل المستخدمين)

والصورة توضح 

حيث ان زر التعديل يتم تفعيلة عندما يحدث تعديل على البيانات المستدعاة

[حسين العصلوجى]

شوف الفكره دي لو عجبتك طبقها علي باقي الكومبو والتكست بوكس انا طبقتها علي الكومبوبوكس 1 فقط للتجربة

 

اعمل Disable لbutton 1 ثم

اضف هذا الكود
Private Sub ComboBox1_AfterUpdate()
[A6] = ComboBox1.Value
If [A6] <> [A5] Then
CommandButton1.Enabled = True
End If
End Sub

اضف هذا الكود في حدث USERFORM ACTIVATE
       [A5] = ComboBox1.Value

اضافة خاصية تحسس التعديل على البيانات في الفورم -h.rar

تم تعديل مارس 11, 2013 بواسطه حسين العصلوجى

[chouki baissa]

ملف رائع مشكور