طلب كود لمسح البيانات

[أبوحازم]

أريد مسح البيانات بزر

Boo2.rar

[بن علية حاجي]

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

 

أخي الكريم، استعمل الكود التالي في Module مع ربطه بزر المسح...

Sub Clear_Range()
Range("E3:F25").ClearContents
End Sub

 

 

أخوك بن علية

[أبوحازم]

شكرا مفهوم بس كيف لو أرت أكثر من زر مسح في ورقة واحدة

[قنديل الصياد]

بعد اذن استاذى الكبير الاستاذ بن علية حاجي

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

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

قم بتجربة الملف واعلمنى بالنتيجة

 

 

[أبوحازم]

حلو حلو جدا جدا شكرا جزيلا جدا لابن علية وشكراجزيلا  لقنديل الصياد وشكر للمنتدى