VBA Word。如何在Word表格中找到第一个空单元格？

在VBA中，可以使用循环来找到Word表格中的第一个空单元格。以下是一个示例代码：

Sub FindFirstEmptyCell()
    Dim tbl As Table
    Dim cell As Cell
    
    ' 获取当前活动文档中的第一个表格
    Set tbl = ActiveDocument.Tables(1)
    
    ' 遍历表格中的每个单元格
    For Each cell In tbl.Range.Cells
        ' 检查单元格是否为空
        If Len(cell.Range.Text) = 2 Then ' 空单元格的文本长度为2（包括回车符）
            ' 选中并退出循环
            cell.Range.Select
            Exit For
        End If
    Next cell
End Sub

这段代码首先获取当前活动文档中的第一个表格，并使用循环遍历表格中的每个单元格。通过检查单元格的文本长度是否为2（包括回车符），可以确定单元格是否为空。当找到第一个空单元格时，将选中该单元格并退出循环。

请注意，这只是一个简单的示例代码，实际应用中可能需要根据具体需求进行适当的修改。