Range("A" & i)和Cells(i,1)比较常用,Cells(i,"A")这种引用方法一般是当列标号较大(BJ,IV),不易计算时,可以直接用双引号加列标作为第二参数) 2.Range、Cells的差异 从以上比较中可以发现,Cells()的优势在于代码循环中可以进行行与列循环,缺点是无法引用区域;Range的优势在于支持自动列出成员,支持
我们发现range(“a1:d2”)可以选定制定连续单元格,但明显发现这里的列号是字母而行号是数字,而cells()则只能表示某个单元格,下面我们通过两者结合达到任意选定区域的效果,实例如下: lastrw = Sheets("示例").Range("a1").End(xlDown).Row lastcl = Sheets("示例").Range("a1").End(xlToRight).Column Shee...
Private Sub CommandButton5_Click()Worksheets("Sheet2").SelectWorksheets(2).Range("A1:D4").SelectEnd SubSub 选中区域()Sheet2.SelectRange("A1:D4").SelectSheet1.SelectEnd SubSheet2.SelectSheet2.Range("a1:d4").Select
2)Range("A1").Select 语句说明:执行上述代码后,选择一个名为"A1"的单元格: 备注:RANGE是单元格,也可以用CELLS(M,N)来代替,其中M是行,N是列。 3)Range("A1:G8").Select 语句说明:执行上述代码后,选择"A1:G8"的连续单元格: 选择不连续的单元格: Range("A1,B6,D9").Select Range("A1,B6:B10,...
Cells(1).Select '下面表示固定单元格,写法简单,不支持变量 [a1].Select '下面代表从A1单元格往下偏移2行,往右便宜3列,第3行第4列所在的单元格 Range("A1").Offset(2, 3).Select End Sub Sub 选择单元格区域()'下面代码选择A1到D6单元格的区域 ' Range("A1:D6").Select '下面代码选择也是A1到D...
你应该用 Private Sub CommandButton5_Click()Range("A1:B4,D1:E4").Select End Sub Private
Range("A1:C1").Value = Array("序号", "姓名", "金额") '单元格区域输入数据 单元格区域数据填充 Set rng = Range("A1:A10") rng.Cells(1).Value = 1 '设置初始值 rng.Cells(1).AutoFill Destination:=rng, Type:=xlFillSeries '单元格区域数据填充 ...
CELLS(y,x)是单个单元格对像。Range()可以是一个单元格,也可以是多个单元格。3、赋值不同 Cells()是对一个单元格赋值。而Range()则可以对一个区域的所有单元格赋值。注意:VBA中“Range(cells(y1,x1),cells(y2,x2)).Select”,就是指选中以cells(y1,x1)和cells(y2,x2)两单元格为对角线...
1、定义一个Range对象。Dim rng As Range 2、引用Range对象 ,假设我们定义了一个工作表对象ws。Set rng = ws.Range("A1:B2")Set rng = ws.Range("C1")Set rng = ws.Range(ws.Cells(1, 1), ws.Cells(3, 3)).Set rng = ws.UsedRangeSet rng = ws.Range("A1").CurrentRegion 3、批注:Set ...
Range(Cells(1, 1), Cells(3.3)).Select End Sub 也可以写为 Sub tt5() Range(Cells(1, "a"), Cells(3, "d")).Select End Sub ‘注意此处格式,range括号内没有引号。 下面是选中一个区域,然后此区域上下或者左右移动。 Sub tt6() Range("c1:c10").Offset(0, -1).Select ...