كيفية إدراج مسافة بسرعة بين كل صف في إكسيل؟

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

أدخل صفوفًا فارغة بين كل صف بواسطة وظيفة الفرز

قم بإدراج صفوف فارغة بين كل صف بواسطة كود فبا

أدخل صفوفًا / أعمدة فارغة بين كل صف / عمود بواسطة Kutools for Excel

---

أدخل صفوفًا فارغة بين كل صف بواسطة وظيفة الفرز

لإدراج صفوف فارغة بين كل صف ، يمكنك ملء سلسلة من الأرقام مرتين أولاً ، ثم فرز الأرقام.

1. في الرقم المجاور ، قم بتعبئة سلسلة من الأرقام لمطابقة رقم الصف.

2. انسخ أرقام السلسلة ، والصقها في الخلية التي تلي الرقم الأخير.

2. حدد كافة أرقام السلاسل ، انقر فوق البيانات > الفرز من الأصغر إلى الأكبر.

3. في ظهرت فرز تحذير حوار ، احتفظ قم بتوسيع خيار التحديد فحص ، انقر فوق تصنيف حسب:.

الآن تم إدراج المسافات بين كل صف. يمكنك إزالة عمود رقم السلسلة لاحقًا.

---

قم بإدراج صفوف فارغة بين كل صف بواسطة كود فبا

إذا كنت معتادًا على كود الماكرو ، فإليك رمز يمكن أن يساعدك أيضًا.

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

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

VAB: أدخل مسافة بين الصفوفs

Sub RowsInsertInSelectCells()
'UpdatebyExtendoffice20180801
Dim xWS As Worksheet
Dim xCR, xR, xCC, xC, xFC, xFR As Long
Dim xFNum As Integer
Dim xRg, xCRg As Range
    On Error Resume Next
    If ActiveWindow.RangeSelection.Count > 0 Then
      xTxt = ActiveWindow.RangeSelection.AddressLocal
    Else
      xTxt = ActiveSheet.UsedRange.AddressLocal
    End If
    Set xWS = ActiveWorkbook.ActiveSheet
    Set xRg = Application.InputBox("please select the data range:", "Kutools for Excel", xTxt, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    If xRg.Count > 0 Then
        xCR = xRg.Rows.Count
        xCC = xRg.Columns.Count
        xR = xRg.Row
        xC = xRg.Column
   Application.ScreenUpdating = False
    For xFC = 0 To xCC - 1
        For xFR = xCR To 1 Step -1
            xWS.Cells(xR + xFR, xC + xFC).Insert
        Next
    Next xFC
    Application.ScreenUpdating = True
    End If

End Sub

3. صحافة F5 مفتاح لتشغيل الكود ، يظهر مربع حوار لتذكيرك بتحديد بيانات العمل.

4. انقر OK. الآن تم إدراج المسافات بين الصفوف المختارة.

---

أدخل صفوفًا / أعمدة فارغة بين كل صف / عمود بواسطة Kutools for Excel

إذا كنت تريد إدراج صفوف أو أعمدة فارغة بين كل صف أو عمود بسرعة وسهولة ، يمكنك استخدام كوتولس ل إكسيلالصورة Insert Blank Rows & Columns الأداة المساعدة ، والتي يمكنك تحديد الفاصل الزمني للصفوف وعدد الصفوف الفارغة حسب حاجتك.

بعد تثبيت Kutools for Excel ، يرجى القيام بما يلي:（تنزيل مجاني Kutools for Excel الآن!)

1. حدد نطاق البيانات الذي تريد إدراج صفوف أو أعمدة فارغة ، انقر فوق Kutools > Insert > Insert Blank Rows & Columns.

2. في ال Insert Blank Rows & Columns الحوار ، تحقق Blank rows or Blank columns حسب حاجتك ، وحدد خيارات Interval of و Rows.

3. انقر Ok.

خامل صفوف فارغة بين كل صف	أدخل عمودًا فارغًا بين كل عمود

معلومه- سرية: هذه الأداة تدعم التراجع CTRL + Z.

  أدخل صفوفًا أو أعمدة فارغة بفواصل زمنية محددة