كيفية إدراج صفوف فارغة بسرعة في Excel؟

قد يواجه معظمنا مشكلة في Excel حيث نحتاج إلى إدراج صف فارغ بين كل صف من الصفوف الموجودة، وجميعنا نعرف كيفية إدراج صف فارغ يدويًا. لكن إدراج مئات الصفوف الفارغة سيكون مهمة شاقة إذا قمت بإدراج كل صف على حدة. إليك بعض الحيل السريعة لمساعدتك في حل هذه المشكلة.

إدراج صفوف فارغة باستخدام وظيفة الترتيب
إدراج عدد معين من الصفوف الفارغة بسرعة باستخدام Kutools لـ Excel
إدراج صفوف فارغة بالتناوب باستخدام كود VBA

إدراج صفوف فارغة باستخدام وظيفة الترتيب

هذه الطريقة أسهل ولكنها غير مباشرة لإدراج صفوف فارغة بين الصفوف الحالية. يمكنك القيام بما يلي:

1. ستحتاج إلى عمود فارغ بجانب بياناتك. على سبيل المثال، لدي ورقة عمل تتكون من A1:E9، يمكنك استخدام العمود F.

2. أدخل الرقم 1 في الخلية F1 وأدخل الرقم 2 في الخلية F2.

3. حدد الرقم 1 والرقم 2، ثم انقر نقرًا مزدوجًا على مقبض التعبئة، وسيقوم Excel بتعبئة الخلايا تلقائيًا في العمود F.

4. بعد ذلك انسخ هذا العمود الجديد F (F1:F9)، وحدد الخلية F10، والصق الأرقام التي تم تعبئتها تلقائيًا من F1:F9. انظر الصورة:

5. وبعد ذلك اضغط على البيانات > ترتيب، ستظهر نافذة تحذير بالترتيب، حدد خيار توسيع التحديد، واضغط على ترتيب... انظر الصورة:

6. ستظهر نافذة الترتيب، اختر الرقم 1 من قائمة الترتيب المنسدلة، ثم اضغط على زر موافق. انظر الصورة:

ثم يتم إدراج صفوف فارغة جديدة بين الصفوف الحالية. انظر الصورة:

ملاحظة: إذا كنت ترغب في إدراج صفوف فارغة أو ثلاثة بين كل صف، يمكنك نسخ العمود الذي تم تعبئته تلقائيًا مرتين أو ثلاث مرات لإضافة الصفوف الجديدة.

إدراج عدد معين من الصفوف الفارغة بسرعة باستخدام Kutools لـ Excel

الطريقتان السابقتان تشير فقط إلى إدراج صفوف فارغة بين كل صف، أما بالنسبة لإدراج صف فارغ أو عدة صفوف بعد كل صف n، كيف يجب أن تقوم بذلك؟ هنا أوصي بأداة إدراج صفوف وأعمدة فارغة من Kutools لـ Excel. هذه الأداة يمكن أن تساعد في إدراج عدد معين من الصفوف الفارغة بسرعة بعد كل صف n ضمن نطاق معين. الرجاء القيام بما يلي.

1. حدد النطاق الذي تريد إدراج الصفوف الفارغة فيه، واضغط على Kutools > إدراج > إدراج صفوف وأعمدة فارغة. انظر الصورة:

2. في نافذة إدراج صفوف وأعمدة فارغة، اختر صفوف فارغة في قسم نوع الإدراج ، حدد عدد صفوف الفاصل التي سيتم إدراج الصفوف الفارغة بناءً عليها وعدد الصفوف التي تريد إدراجها، ثم اضغط على زر موافق. انظر الصورة:

>

ثم يمكنك رؤية أن صفوف فارغة معينة قد تم إدراجها بعد كل صفَّين. انظر الصور:

ملاحظة: يمكن تعديل الرقم في الفاصل الزمني و الصفوف لتلبية احتياجاتك. على سبيل المثال، يمكنك إدراج ثلاثة، أربعة، خمسة… صفوف فارغة بعد كل صف واحد، اثنين، ثلاثة… صفوف.

إدراج صفوف فارغة بالتناوب باستخدام كود VBA

إذا كانت الطريقة السابقة معقدة بعض الشيء، يمكنك استخدام الكود التالي VBA لحلها.

1. اضغط على مفاتيح Alt + F11 لفتح نافذة Microsoft Visual Basic for applications، ثم اضغط على إدراج > وحدة وأدخل الكود التالي في الوحدة:

كود VBA: إدراج صفوف فارغة في Excel

Sub InsertBlackRows()
'Updateby20131127
Dim Rng As Range
Dim WorkRng As Range
Dim FirstRow As Integer, xRows As Integer, xCols As Integer
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
FirstRow = WorkRng.Row
xRows = WorkRng.Rows.Count
xCols = WorkRng.Columns.Count
Application.ScreenUpdating = False
WorkRng.Cells(xRows, 1).Resize(1, xCols).Select
Do Until Selection.Row = FirstRow
    Selection.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove
    Selection.Offset(-1, 0).Select
Loop
Application.ScreenUpdating = True
End Sub

2. بعد ذلك اضغط أو اضغط على مفتاح F5 لتشغيل الكود. في نافذة Kutoos لـ Excel التي ستظهر، حدد النطاق الذي سيتم إدراج الصفوف الفارغة فيه، ثم اضغط على زر موافق. انظر الصورة:

ثم يتم إدراج صف فارغ جديد بين كل صفَّين. انظر الصورة:

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

• إدراج عمود فارغ بسرعة بعد كل عمود آخر
• إدراج عدة صفوف أو أعمدة فارغة دفعة واحدة