在VBA中,可以通过Application.Selection对象获取当前选中的单元格或单元格区域。如果你想获取第一个选中单元格的坐标,可以使用Application.Selection.Address属性。
vbaSub GetFirstCellAddress()
Dim selectedRange As Range
Set selectedRange = Application.Selection
' 获取第一个选中单元格的地址Dim firstCellAddress As String
firstCellAddress = selectedRange.Cells(1, 1).Address
End Sub
我们使用selectedRange.Cells(1, 1).Address获取第一个选中单元格的地址。
需要注意的是,如果用户选择了多个不连续的单元格或区域,这个方法可能无法正确工作。