
1个回答
展开全部
VBA代码如下:
Sub RC()
R=Selection.rows.row
ActiveSheet.Range("a1).Value =R '选择单元格的第一行行号 送入A1
C=Selection.Columns.Column
ActiveSheet.Range("a2").Value =C '选择单元格的第一列列号 送入A2
End Sub
Sub RC()
R=Selection.rows.row
ActiveSheet.Range("a1).Value =R '选择单元格的第一行行号 送入A1
C=Selection.Columns.Column
ActiveSheet.Range("a2").Value =C '选择单元格的第一列列号 送入A2
End Sub
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询