كيفية مسح المحتويات والتنسيق في نفس الوقت في الخلايا في Excel؟

عادةً ما يؤدي الضغط على مفتاح Delete على لوحة المفاتيح إلى حذف محتويات الخلايا المحددة. ولكن كيف يتم مسح تنسيق الخلية أيضًا عند حذف المحتويات؟ تقدم هذه المقالة طريقة VBA لحل هذه المشكلة.

امسح المحتويات والتنسيق في نفس الوقت في الخلايا ذات التعليمات البرمجية لـ VBA

امسح المحتويات والتنسيق في نفس الوقت في الخلايا ذات التعليمات البرمجية لـ VBA

رائعة حقا! استخدام علامات تبويب فعالة في Excel مثل Chrome و Firefox و Safari!

وفر 50٪ من وقتك ، وقلل آلاف النقرات بالماوس كل يوم!

يمكن أن يساعدك رمز VBA أدناه في مسح محتويات الخلية وتنسيقها في نفس الوقت ، يرجى القيام بما يلي.

1. في ورقة العمل التي تريد مسح المحتويات والتنسيق من الخلايا ، يرجى الضغط على قديم + F11 مفاتيح لفتح ميكروسوفت فيسوال باسيك للتطبيقات نافذة.

2. في ال ميكروسوفت فيسوال باسيك للتطبيقات الإطار، انقر فوق إدراج > وحدة. ثم انسخ والصق كود فبا في نافذة الكود.

كود فبا: امسح المحتويات والتنسيق في نفس الوقت في الخلايا

Sub sbClearCellsOnlyData()
    Dim xRg As Range
    On Error Resume Next
    Set xRg = Application.InputBox("Please select cell(s)：", "KuTools For Excel", Selection.Address, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    Application.ScreenUpdating = False
    xRg.Clear
    Application.ScreenUpdating = True
End Sub

3. في ظهرت كوتولس ل إكسيل مربع الحوار ، يرجى تحديد الخلايا التي ستقوم بمسح المحتويات والتنسيق في نفس الوقت ، ثم انقر فوق OK زر. انظر لقطة الشاشة:

ثم يمكنك رؤية محتويات وتنسيق الخلايا المحددة يتم مسحها على الفور كما هو موضح أدناه لقطة الشاشة.

مقالات ذات صلة:

• كيفية مسح محتويات مربع التحرير والسرد برمز VBA في Excel؟
• كيفية مسح محتويات النطاق المسمى في Excel؟
• كيفية مسح القيم المقيدة في الخلايا في Excel؟
• كيفية مسح محتويات الخلية المحددة إذا تغيرت قيمة خلية أخرى في إكسيل؟
• كيفية مسح محتويات الخلية المحددة عند الفتح والخروج في مصنف Excel؟

أفضل أدوات إنتاجية المكتب

Kutools for Excel يحل معظم مشاكلك ويزيد إنتاجيتك بنسبة 80٪

• إعادة استخدام: أدخل بسرعة الصيغ المعقدة والرسوم البيانية وأي شيء استخدمته من قبل ؛ تشفير الخلايا مع كلمة السر إنشاء قائمة بريدية وإرسال رسائل البريد الإلكتروني ...
• سوبر فورميولا بار (بسهولة تحرير أسطر متعددة من النص والصيغة) ؛ تخطيط القراءة (قراءة وتحرير أعداد كبيرة من الخلايا بسهولة) ؛ لصق في النطاق المصفى...
• دمج الخلايا / الصفوف / الأعمدة دون فقدان البيانات ؛ تقسيم محتوى الخلايا ؛ ادمج الصفوف / الأعمدة المكررة... منع تكرار الخلايا؛ قارن النطاقات...
• حدد مكرر أو فريد صفوف حدد صفوف فارغة (جميع الخلايا فارغة) ؛ البحث الفائق والبحث الغامض في العديد من المصنفات. تحديد عشوائي ...
• نسخة طبق الأصل خلايا متعددة بدون تغيير مرجع الصيغة ؛ إنشاء المراجع تلقائيًا إلى أوراق متعددة أدخل الرموز النقطية، مربعات الاختيار والمزيد ...
• استخراج النص، إضافة نص ، إزالة حسب الموضع ، إزالة الفضاء؛ إنشاء وطباعة المجاميع الفرعية لترحيل الصفحات ؛ التحويل بين محتوى الخلايا والتعليقات...
• سوبر تصفية (حفظ وتطبيق مخططات التصفية على أوراق أخرى) ؛ فرز متقدم حسب الشهر / الأسبوع / اليوم ، التكرار والمزيد ؛ مرشح خاص بواسطة bold، italic ...
• اجمع بين المصنفات وأوراق العمل؛ دمج الجداول على أساس الأعمدة الرئيسية ؛ تقسيم البيانات إلى أوراق متعددة; تحويل دفعة xls و xlsx و PDF...
• أكثر من 300 ميزة قوية. يدعم Office / Excel 2007-2019 و 365. يدعم جميع اللغات. سهولة النشر في مؤسستك أو مؤسستك. الميزات الكاملة نسخة تجريبية مجانية لمدة 30 يومًا. ضمان استرداد الأموال لمدة 60 يومًا.

اقرأ أكثر... تحميل مجاني ... شراء... 

---

يجلب Office Tab الواجهة المبوبة إلى Office ، ويجعل عملك أسهل بكثير

• تمكين التحرير والقراءة المبوبة في Word و Excel و PowerPointوالناشر والوصول و Visio والمشروع.
• فتح وإنشاء مستندات متعددة في علامات تبويب جديدة من نفس النافذة ، بدلاً من النوافذ الجديدة.
• يزيد إنتاجيتك بنسبة 50٪ ، ويقلل مئات النقرات بالماوس كل يوم!

اقرأ أكثر... تحميل مجاني ... شراء...