1、将单元格所选单元格的行号和列号,分别用VBA显示在下面的两个单元格中,
2、按下Alt+F11,打开VBA编辑界面,选择当前工作表编写代码,
3、下面代码是得到当前单元格的行号并放到当前单元格下一个单元格中:
4、下面代码是得到当前单元格的列号并放到当前单元格下面第二个单元格中:
5、代码编写完成,点击运行子过程按钮(或按下F5),
6、最后返回Excel中,就可以看到得到了当前单元格的行号和列号,
ActiveCell.Row ‘活动单元格所在的行数
ActiveCell.Column ‘活动单元格所在的列数
Dim 行, 列
列 = Cells.Find("要找的数据").Column
行 = Cells.Find("要找的数据").Row
MsgBox "要查找的数据在" & 行 & "行" & 列 & "列"
参考思路如下:
Function rc_test(a)
On Error Resume Next
rc_test = a.Row & "/" & a.Column
End Function