Excel宏循环2列，检查空单元格并添加单元格VBA或C#

Sub AddCells()
    Dim ws As Worksheet
    Dim lastRow As Long
    Dim i As Long
    
    ' 设置要操作的工作表
    Set ws = ThisWorkbook.Worksheets("Sheet1") ' 将"Sheet1"替换为实际的工作表名称
    
    ' 获取第一列的最后一行
    lastRow = ws.Cells(ws.Rows.Count, 1).End(xlUp).Row
    
    ' 循环遍历每一行
    For i = 1 To lastRow
        ' 检查第一列和第二列的单元格是否为空
        If ws.Cells(i, 1).Value = "" And ws.Cells(i, 2).Value = "" Then
            ' 如果为空，则在第一列和第二列的下一行插入一个单元格
            ws.Cells(i + 1, 1).Insert Shift:=xlDown
            ws.Cells(i + 1, 2).Insert Shift:=xlDown
        End If
    Next i
End Sub

using System;
using Excel = Microsoft.Office.Interop.Excel;

namespace ExcelMacro
{
    class Program
    {
        static void Main(string[] args)
        {
            Excel.Application excelApp = new Excel.Application();
            Excel.Workbook workbook = excelApp.Workbooks.Open(@"C:\path\to\your\excel\file.xlsx"); // 替换为实际的Excel文件路径
            Excel.Worksheet worksheet = workbook.Worksheets["Sheet1"]; // 将"Sheet1"替换为实际的工作表名称
            
            int lastRow = worksheet.Cells[worksheet.Rows.Count, 1].End(Excel.XlDirection.xlUp).Row;
            
            for (int i = 1; i <= lastRow; i++)
            {
                if (worksheet.Cells[i, 1].Value == null && worksheet.Cells[i, 2].Value == null)
                {
                    worksheet.Cells[i + 1, 1].Insert(Excel.XlInsertShiftDirection.xlShiftDown);
                    worksheet.Cells[i + 1, 2].Insert(Excel.XlInsertShiftDirection.xlShiftDown);
                }
            }
            
            workbook.Save();
            workbook.Close();
            excelApp.Quit();
        }
    }
}