VBA获取当前单元格所在行

要获取当前单元格所在的行，你可以使用VBA中的`ActiveCell`对象的`Row`属性。下面是一个示例代码：

Sub GetCurrentRow()
    Dim currentRow As Integer
    
    currentRow = ActiveCell.Row
    
    MsgBox "当前单元格所在行为：" & currentRow
End Sub

这段代码将获取当前活动单元格所在的行数，并通过消息框显示出来。你可以根据需要修改代码以适应你的具体情况。