在Excle中有两种引用方式，例如：第一行第一列的单元格可以是：A1 也可以是R1C1
切换引用样式的代码如下：
Sub 切换引用样式() Application.ReferenceStyle = xlR1C1 ‘切换为A1样式 MsgBox "已经切换为R1C1样式！" Application.ReferenceStyle = xlA1 ‘切换为R1C1样式 MsgBox "已经切换为A1样式！" End Sub
执行效果如下：
原文：http://www.cnblogs.com/OliverQin/p/7325103.html