انتقل إلى المحتوى الرئيسي

كيفية مسح محتويات عدة خلايا مدمجة في إكسيل؟

المؤلف: شياويانغ آخر تعديل: 2024-11-04

إذا كانت لديك ورقة عمل كبيرة تحتوي على عدة خلايا مدمجة ، والآن ، فأنت تريد مسح جميع محتويات الخلايا المدمجة مع الاحتفاظ بالخلايا المدمجة. عادة ، يمكنك محاولة تطبيق بحث واستبدال لتحديد جميع الخلايا المدمجة أولاً ، ثم اضغط على حذف مفتاح لحذف القيمة ، ومع ذلك ، ستصلك رسالة تحذير "لا يمكننا فعل ذلك بخلية مدمجةفي هذه الحالة ، كيف يمكنك مسح القيم في الخلايا المدمجة مع ترك الخلايا المدمجة بسرعة في Excel؟

امسح محتويات عدة خلايا مدمجة برمز VBA

امسح محتويات الخلايا المدمجة المتعددة باستخدام Kutools for Excel


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

في هذا القسم، يمكنني إنشاء كود VBA لك لحل هذه المهمة؛ يرجى القيام بما يلي.

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

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

فبا: امسح محتويات عدة خلايا مدمجة

Sub ClearMerged()
'updateby Extendoffice
    Dim Rg As Range, Rg1 As Range
    Dim xAddress As String
    On Error Resume Next
    xAddress = Application.ActiveWindow.RangeSelection.Address
    Set Rg = Application.InputBox("Please select the range of cells:", "Kutools for Excel", xAddress, , , , , 8)
    If Rg Is Nothing Then Exit Sub
    For Each Rg1 In Rg
        If Rg1.MergeCells Then Rg1.MergeArea.ClearContents
    Next
End Sub

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

لقطة شاشة لمطالبة VBA بتحديد النطاق لمسح الخلايا المدمجة

4. ثم انقر فوق OK، تم مسح المحتويات الموجودة في الخلايا المدمجة مرة واحدة وترك الخلايا المدمجة الفارغة ، انظر الصورة:

لقطة شاشة توضح المحتويات التي تم مسحها في الخلايا المدمجة بعد تشغيل كود VBA


السهم الأزرق الحق فقاعة امسح محتويات الخلايا المدمجة المتعددة باستخدام Kutools for Excel

إذا كان لديك كوتولس ل إكسيل، بما لديها حدد الخلايا المدمجة الأداة المساعدة ، يمكنك تحديد جميع الخلايا المدمجة في تحديد بنقرة واحدة ، ثم حذفها مرة واحدة.

كوتولس ل إكسيل يقدم أكثر من 300 ميزة متقدمة لتبسيط المهام المعقدة وتعزيز الإبداع والكفاءة. دمج مع قدرات الذكاء الاصطناعي، يقوم Kutools بأتمتة المهام بدقة، مما يجعل إدارة البيانات سهلة. معلومات تفصيلية عن Kutools لـ Excel...         تجربة مجانية...

بعد تثبيت كوتولس ل إكسيليرجى القيام بما يلي:

1. حدد نطاق الخلايا الذي يحتوي على الخلايا المدمجة التي تريد مسح المحتويات.

2. انقر كوتولس > أختار > حدد الخلايا المدمجة، انظر لقطة الشاشة:

لقطة شاشة لخيار تحديد الخلايا المدمجة في علامة التبويب Kutools على الشريط

3. وتم تحديد جميع الخلايا المدمجة على الفور ، انظر الصورة:

لقطة شاشة تظهر الخلايا المدمجة المحددة في Excel باستخدام Kutools

4. ثم اضغط حذف على لوحة المفاتيح ، وتم تحديد جميع القيم الموجودة في الخلايا المدمجة ولكن اترك الخلايا المدمجة كما تريد.

انقر لمعرفة المزيد حول الأداة المساعدة لتحديد الخلايا المدمجة ...

كوتولس ل إكسيل - قم بتزويد Excel بأكثر من 300 أداة أساسية. استمتع بميزات الذكاء الاصطناعي المجانية بشكل دائم! احصل عليه الآن

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

🤖 مساعد Kutools AI: إحداث ثورة في تحليل البيانات على أساس: التنفيذ الذكي   |  إنشاء التعليمات البرمجية  |  إنشاء صيغ مخصصة  |  تحليل البيانات وإنشاء الرسوم البيانية  |  استدعاء وظائف Kutools...
الميزات الشعبية: البحث عن التكرارات أو تمييزها أو تحديدها   |  حذف الصفوف الفارغة   |  دمج الأعمدة أو الخلايا دون فقدان البيانات   |   جولة بدون صيغة 
سوبر بحث: معايير متعددة VLookup    VLookup ذات القيمة المتعددة  |   VLookup عبر أوراق متعددة   |   بحث غامض ....
قائمة منسدلة متقدمة: إنشاء القائمة المنسدلة بسرعة   |  القائمة المنسدلة التابعة   |  قائمة منسدلة متعددة التحديد ....
مدير العمود: إضافة عدد محدد من الأعمدة  |  نقل الأعمدة  |  تبديل حالة رؤية الأعمدة المخفية  |  مقارنة النطاقات والأعمدة 
الميزات المميزة: التركيز على الشبكة   |  عرض تصميم   |   شريط الفورمولا الكبير    مدير المصنفات والأوراق   |  مكتبة الموارد (النص السيارات)   |  منتقي التاريخ   |  اجمع أوراق العمل   |  تشفير/فك تشفير الخلايا    إرسال رسائل البريد الإلكتروني عن طريق القائمة   |  سوبر تصفية   |   مرشح خاص (تصفية غامق / مائل / يتوسطه خط ...) ...
أفضل 15 مجموعة أدوات12 نص الأدوات (إضافة نص, إزالة الأحرف، ...)   |   +50 رسم الأنواع (مخطط جانت، ...)   |   40+ عملي الصيغ (احسب العمر على أساس تاريخ الميلاد، ...)   |   19 إدخال الأدوات (أدخل رمز الاستجابة السريعة, إدراج صورة من المسار، ...)   |   12 تحويل الأدوات (أرقام إلى كلمات, نتيجة تحويل عملة، ...)   |   7 دمج وتقسيم الأدوات (الجمع بين الصفوف المتقدمة, تقسيم الخلايا، ...)   |   ... و اكثر

عزز مهاراتك في Excel باستخدام Kutools for Excel، واختبر كفاءة لم يسبق لها مثيل. يقدم Kutools for Excel أكثر من 300 ميزة متقدمة لتعزيز الإنتاجية وتوفير الوقت.  انقر هنا للحصول على الميزة التي تحتاجها أكثر...


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

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