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

在Excel中，可以使用VBA（Visual Basic for Applications）或C#编程语言来实现宏循环，检查空单元格并添加单元格的功能。

VBA实现：

打开Excel文件，按下Alt + F11打开VBA编辑器。
在VBA编辑器中，选择插入 -> 模块，创建一个新的模块。
在模块中编写以下VBA代码：

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

关闭VBA编辑器，按下Alt + F8打开宏对话框。
选择刚刚创建的宏（AddCells），点击运行。

这样，宏将循环遍历第一列和第二列的单元格，如果两个单元格都为空，则在下一行插入一个空单元格。

C#实现：

打开Visual Studio或其他C#开发环境，创建一个新的控制台应用程序项目。
在Main方法中编写以下C#代码：

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();
        }
    }
}