当然比较笨,那就是把("A1:D4").中的A,D用开始你指定的(1,1)(4,4)通过数值转化字母的方式进行转化 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
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 r...
Range()则是指一个区域。2、范围不同 CELLS(y,x)是单个单元格对像。Range()可以是一个单元格,也可以是多个单元格。3、赋值不同 Cells()是对一个单元格赋值。而Range()则可以对一个区域的所有单元格赋值。注意:VBA中“Range(cells(y1,x1),cells(y2,x2)).Select”,就是指选中以cells(y1...
Range("A1").Select选择单元格 Range("A1").Cells 选择其中的单元格 Range("A1").Rows 选择其中的行 Range("A1").Cells 选择其中的列 Range("A1").Offset 偏移所选区域Range("A1").Offset(2,3).Value= 5 Range("A1").Resize扩大或缩小所选区域Range("B2").Resize(5,4).Select Range("A1").End...
Range("a1").Select Cells(1, 1).Select Range("A" & 1).Select Cells(1, "A").Select Cells(1).Select [a1].Select End Sub '2 表示相邻单元格区域 Sub d() '选取单元格a1:c5 ' Range("a1:c5").Select ' Range("A1", "C5").Select ...
你应该用 Private Sub CommandButton5_Click()Range("A1:B4,D1:E4").Select End Sub Private
[C5].Select Cells(65539).Select Cells(5,'C').Select 均选取单元格C5为当前单元格。 下面的代码: Range('C2:C5').Select Range('C2','C5').Select [C2:C5].Select Range(Range('C2'), Range('C5')).Select Range(Cells(2, 2), Cells(5, 2)).Select 均选取单元格区域C2:C5。 下面的代码:...
说明:Excel VBA 在第 3 行和第 2 列交叉处的单元格中输入值 2。代码:Range(Cells(1, 1), ...
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...
Union(Range("A1:B6"),Range("D5:H9")) 表示由A1:B6和D5:H9构成的范围 Range对象方法 Activate 方法:激活单个单元格,该单元格必须处于当前选定区域内。 若要选择单元格区域, 请使用select方法。 AddComment 方法:为区域添加批注,参数可选:表示批注文字。