Range("A11:D11,B7,C9").Select ②Cells属性选择单元格 1.选择单个单元格(例如A5) Cells(5,1).Select Cells(5,”A”).Select 2.选择一个单元格区域(例如A6:A10) Range(Cells(6,1),Cells(10,1)).Select 3.选择工作表中的所有单元格 Cells.Select VBA里Range,cells,
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
我们发现range(“a1:d2”)可以选定制定连续单元格,但明显发现这里的列号是字母而行号是数字,而cells()则只能表示某个单元格,下面我们通过两者结合达到任意选定区域的效果,实例如下: lastrw = Sheets("示例").Range("a1").End(xlDown).Row lastcl = Sheets("示例").Range("a1").End(xlToRight).Column Shee...
Range("A1,B6:B10,D9").Select 语句说明:执行上述代码后,选择不连续单元格:"A1,B6,D9","A1,B6:B10,D9" lCELLS()的单元格表示方式是不能用这种表示方法的。 4)Cells.Select 语句说明:执行上述代码后,选择整个工作表. l注意select和selection的区别,这里用的是select 5)Range("B2").CurrentRegion.Select...
VBA之Range,cells,offset,end的区别 VBA之Range,cells,offset,end的区别 一.Range属性 1.选择单个单元格(例如A5)Range('A5').Select 2.选择一个单元格区域(例如A6:A10)Range('A6:A10').Select 3.选择一些不相邻的单元格(例如A1,B6,C8)Range('A1,B6,C8').Select 4.选择一些不相邻的单元格和单元格区域(...
你应该用 Private Sub CommandButton5_Click()Range("A1:B4,D1:E4").Select End Sub Private
CELLS(y,x)是单个单元格对像。Range()可以是一个单元格，也可以是多个单元格。3、赋值不同 Cells()是对一个单元格赋值。而Range()则可以对一个区域的所有单元格赋值。注意：VBA中“Range(cells(y1,x1),cells(y2,x2)).Select”，就是指选中以cells(y1,x1)和cells(y2,x2)两单元格为对角线...
Cells(i, j).Interior.Color = RGB(0, 255, 0) '引用第i行第j列的单元格,并设置背景颜色 Range("A" & i & ":B" & j).Borders.LineStyle = xlDash '引用从Ai到Bj的单元格区域,并设置虚线边框 Set rng = Range(Cells(i, j), Cells(m, n)) '引用从(i, j)到(m, n)的单元格区域 ...
[a1].Select End Sub '2 表示相邻单元格区域 Sub d() '选取单元格a1:c5 ' Range("a1:c5").Select ' Range("A1", "C5").Select ' Range(Cells(1, 1), Cells(5, 3)).Select 'Range("a1:a10").Offset(0, 1).Select Range("a1").Resize(5, 3).Select ...
Set rng = ws.Range(ws.Cells(1, 1), ws.Cells(3, 3))Debug.Print rng.Address'运行结果是：$A$1:$C$3 5、AutoFit：自动最合适行高、列宽 rng.Columns.AutoFitrng.Rows.AutoFit 6、Borders：边框 rng.Borders.LineStyle = xlContinuous 7、Cells：单元格，工作表也有Cells属性，可不可以这么理解，一个...