كيفية مسح محتويات عدة خلايا مدمجة في إكسيل؟
إذا كانت لديك ورقة عمل كبيرة تحتوي على عدة خلايا مدمجة ، والآن ، فأنت تريد مسح جميع محتويات الخلايا المدمجة مع الاحتفاظ بالخلايا المدمجة. عادة ، يمكنك محاولة تطبيق بحث واستبدال لتحديد جميع الخلايا المدمجة أولاً ، ثم اضغط على حذف مفتاح لحذف القيمة ، ومع ذلك ، ستصلك رسالة تحذير "لا يمكننا فعل ذلك بخلية مدمجةفي هذه الحالة ، كيف يمكنك مسح القيم في الخلايا المدمجة مع ترك الخلايا المدمجة بسرعة في 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 اضغط على المفتاح لتشغيل هذا الكود، وسيظهر مربع مطالبة لتذكيرك بتحديد النطاق الذي تريد مسح الخلايا المدمجة فيه. انظر لقطة الشاشة:
4. ثم انقر فوق OK، تم مسح المحتويات الموجودة في الخلايا المدمجة مرة واحدة وترك الخلايا المدمجة الفارغة ، انظر الصورة:
امسح محتويات الخلايا المدمجة المتعددة باستخدام Kutools for Excel
إذا كان لديك كوتولس ل إكسيل، بما لديها حدد الخلايا المدمجة الأداة المساعدة ، يمكنك تحديد جميع الخلايا المدمجة في تحديد بنقرة واحدة ، ثم حذفها مرة واحدة.
بعد تثبيت كوتولس ل إكسيليرجى القيام بما يلي:
1. حدد نطاق الخلايا الذي يحتوي على الخلايا المدمجة التي تريد مسح المحتويات.
2. انقر كوتولس > أختار > حدد الخلايا المدمجة، انظر لقطة الشاشة:
3. وتم تحديد جميع الخلايا المدمجة على الفور ، انظر الصورة:
4. ثم اضغط حذف على لوحة المفاتيح ، وتم تحديد جميع القيم الموجودة في الخلايا المدمجة ولكن اترك الخلايا المدمجة كما تريد.
انقر لمعرفة المزيد حول الأداة المساعدة لتحديد الخلايا المدمجة ...
كوتولس ل إكسيل - قم بتزويد Excel بأكثر من 300 أداة أساسية. استمتع بميزات الذكاء الاصطناعي المجانية بشكل دائم! احصل عليه الآن
أفضل أدوات إنتاجية المكتب
عزز مهاراتك في Excel باستخدام Kutools for Excel، واختبر كفاءة لم يسبق لها مثيل. يقدم Kutools for Excel أكثر من 300 ميزة متقدمة لتعزيز الإنتاجية وتوفير الوقت. انقر هنا للحصول على الميزة التي تحتاجها أكثر...
يجلب Office Tab الواجهة المبوبة إلى Office ، ويجعل عملك أسهل بكثير
- تمكين التحرير والقراءة المبوبة في Word و Excel و PowerPointوالناشر والوصول و Visio والمشروع.
- فتح وإنشاء مستندات متعددة في علامات تبويب جديدة من نفس النافذة ، بدلاً من النوافذ الجديدة.
- يزيد من إنتاجيتك بنسبة 50٪ ، ويقلل مئات النقرات بالماوس كل يوم!