اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

اريد مسح البيانات دون المعادلات


إذهب إلى أفضل إجابة Solved by وليد فتحي,

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

الاساتذة الافاضل

لقد قام الاستاذ / وليد فتحى

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

 DC6:PC13مثلاو اتمنى ان يقوم احد باثراء الموضوع للاستفادة ،عن طريق تحديد نطاق معين و ليكن 

بحيث اقوم بتغيير هذا النطاق فقط فى حالة اضافة اعمدة او صفوف على الملف

 ليمر الكود على هذا النطاق و يقوم بمسح اى شى بالخلية سواء رقم او نص او تعليق

دون مسح المعادلات

و لكم جزيل الشكر فانتم اساتذة فعلا كبار و انا استفدت منكم كثيرا

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

و اشكركم مرة اخرى

جعله الله فى ميزان حسناتكم

 

رابط هذا التعليق
شارك

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

الاستاذ الفاضل صلاح

بحث ووجدت لك هذا الكود ولكن بشرط ان تقوم بعمل حماية للصفحة

Sub W_DELETE()
On Error Resume Next
    ActiveSheet.Range("B6:PH132").Value = vbNullString
End Sub

رابط هذا التعليق
شارك

اشكرك استاذ / وليد على المتابعة

و لكن عند حمل حماية للورقة الكود يعمل و لكن لا يمسح اى شى ثم ان حماية الورقة لا تمكنى من العمل على خلايا البيانات بسبب الحماية

رابط هذا التعليق
شارك

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

اخي الفضل صلاح

يجب عليك اولا ازالة الحماية من جميع الخلايا

وبعد ذلك تحديد الخلايا المؤمنة فقط والتي بها بيانات ولا تريد حذف المعادلات منها

جرب وبانتظار ردك

رابط هذا التعليق
شارك

اريد كود لاثراء الموضوع يتمكن من مسع القيم و البيانات و التعليقات و ذلك على نطاق كبير و ليكن DC6:PC132 دون ان يمسح المعادلات داخل هذا النطاق

رابط هذا التعليق
شارك

  • أفضل إجابة

اشكرك استاذ / وليد

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

 

استاذ صلاح انت قولت هتجرب وترد

ورجعت قولت عاوز كود

جرب ام لا لاني جربت هذا الكود وشغال تمام بعد تامين الخلايا التي بها معادلات

بانتظار ردك

رابط هذا التعليق
شارك

استاذ / وليد 

اشكرك على اهتمامك و لكن الملف يمكن اضافة اعمدة به و جائز ان انسى تأمين المعادلات و ان الغاء تأمين البيانات فيتم مسح المعادلات

عزرا سوف اتابع مع حضرتك بعد ساعات 

و اشكرك مرة اخرى

رابط هذا التعليق
شارك

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