كيف ترقيم الخلايا المدمجة تلقائيًا في إكسيل؟
كيف يمكننا ملء أرقام السلسلة في قائمة خلايا مدمجة مختلفة الحجم في Excel؟ أول ما يدور في أذهاننا هو سحب مقبض الملء التلقائي لملء الخلايا المدمجة ، ولكن في هذه الحالة ، سنحصل على رسالة التحذير التالية ، ولا يمكننا ملء الخلايا المدمجة.
نظرًا لأن مقبض التعبئة لا يدعم الخلايا المدمجة ، هنا ، يمكنني التحدث عن بعض الحيل الأخرى لحل هذه المشكلة.
رقم تلقائي / تعبئة الخلايا المدمجة برمز VBA
رقم تلقائي / تعبئة الخلايا المدمجة برمز VBA
يمكن أن تساعدك التعليمات البرمجية لـ VBA التالية في ترقيم الخلايا المدمجة المحددة بسرعة. الرجاء القيام بما يلي:
1. اضغط باستمرار على ALT + F11 مفاتيح ، ويفتح نافذة ميكروسوفت فيسوال باسيك للتطبيقات.
2. انقر إدراج > وحدة، والصق الكود التالي في ملف نافذة الوحدة.
كود فبا: رقم تلقائي الخلايا المدمجة
Sub NumberCellsAndMergedCells()
'Update 20141028
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type: = 8)
Set WorkRng = WorkRng.Columns(1)
xIndex = 1
Set Rng = WorkRng.Range("A1")
Do While Not Intersect(Rng, WorkRng) Is Nothing
Rng.Value = xIndex
xIndex = xIndex + 1
Set Rng = Rng.MergeArea.Offset(1)
Loop
End Sub
3. ثم اضغط F5 مفتاح لتشغيل هذا الرمز ، وسيظهر مربع موجه للسماح لك بتحديد الخلايا المدمجة التي تريد تعبئتها ، انظر لقطة الشاشة:
4. بعد تحديد الخلايا المدمجة ، وانقر فوق OK، الآن ، تم ملء الخلايا المدمجة المحددة بأرقام متسلسلة ، انظر الصورة:
مقالات ذات صلة:
كيفية إعادة الترقيم التلقائي أو إعادة الترقيم بعد التصفية في Excel؟
كيفية دمج الصفوف المتجاورة بسرعة مع نفس البيانات في Excel؟
كيفية إلغاء دمج الخلايا وتعبئتها بقيم مكررة في Excel؟
أفضل أدوات إنتاجية المكتب
عزز مهاراتك في Excel باستخدام Kutools for Excel، واختبر كفاءة لم يسبق لها مثيل. يقدم Kutools for Excel أكثر من 300 ميزة متقدمة لتعزيز الإنتاجية وتوفير الوقت. انقر هنا للحصول على الميزة التي تحتاجها أكثر...
يجلب Office Tab الواجهة المبوبة إلى Office ، ويجعل عملك أسهل بكثير
- تمكين التحرير والقراءة المبوبة في Word و Excel و PowerPointوالناشر والوصول و Visio والمشروع.
- فتح وإنشاء مستندات متعددة في علامات تبويب جديدة من نفس النافذة ، بدلاً من النوافذ الجديدة.
- يزيد من إنتاجيتك بنسبة 50٪ ، ويقلل مئات النقرات بالماوس كل يوم!
