range对象代表某一单元格，某一行，某一列，某一选定区域
Sub rng() Range("a2").Select ‘单元格 Range("a:a").Select ‘列 Range("1:3").Select ‘行 Range("a1:b10").Select ‘相邻区域 Range("a1", "b10").Select Range(Range("a1"), Range("b10")).Select Range("a1:d7,c4:e8").Select ‘不相邻区域 并选 Range("a1:d7 c4:e8").Select ‘不相邻区域 交选 End Sub
Sub range的变量支持() Dim a% a = 3 Range("a" & a).Select Range("c3:e5")(2).Select End Sub
原文：http://www.cnblogs.com/qcl_008/p/4812726.html