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("A1"),就可以定位到A1单元格。为了能更好地了解VBA中Range的用法,我们通过下面这个案例来说明一下。我们任意打开一个新的Excel工作表,点击“开发工具”选项卡下的“Visual Basic”,打开VBE编程环境。在VBA项目工程中,点击当前的工作表Sheet3,右键鼠标“插入”一个新的模块,随之会打开一个...
Sub 对象range() Range("a1", "b4").Select Range("a2:b4").Select End Sub 3.表示一个不连续的区域 对于不连续的区域,range的表达是:range("起始单元格1:结束单元格1,起始单元格2:结束单元格2"),如:我要选择(a1:b2)和(b3:c4)连个区域 程序: Sub 对象range() Range("a1:b2,c3:d4").Select ...
Dim rngRange As Range Dim rngCell As Range Set rngRange = Range("a1").CurrentRegion For Each rngCell In rngRange If VBA.IsError(rngCell.Value) = True Then rngCell.Value = "" End If Next rngCell Set rngCell = Nothing Set rngRange = Nothing End Sub 1 2 3 4 5 6 7 8 9 10 11...
在下面的这篇文章中将和大家分享Excel VBA中的With语句。1. 在Excel文件中打开Visual Basic,添加一个模块和过程,称之为“test”。Sub test()End Sub 2. 假设要分别给A1,A5,B6等三个单元格赋值,则可以按照如下代码来完成;这里主要用到的是Range对象。Sub test()Sheet2.Range("A1") = 1Sheet2.Range("...
Range("C1:D9 A2:E6") 不同区域间以空格区分,表示这些区域的交集 Range("A1","B3:F6") 表示 A1:F6区域 注意事项:如果使用文本参数指定区域地址,则必须以 A1 样式记号指定该地址(不能用 R1C1 样式记号)。使用 Union (range1, range2, ...) 可返回多区域范围,即返回由两个或多个连续单元格区域构成的...
在代码中添加Range("A1"),就可以定位到A1单元格。为了能更好地了解VBA中Range的用法,我们通过下面这个案例来说明一下。 我们任意打开一个新的Excel工作表,点击“开发工具”选项卡下的“Visual Basic”,打开VBE编程环境。 在VBA项目工程中,点击当前的工作表Sheet3,右键鼠标“插入”一个新的模块,随之会打开一个代码...
range的常见用法 1 1.表示单元格 range("A1")表示第一行第一列的单元格,实质上于cells(1,1)效果一样。两者在这种情况下是一样的,但是两者的关系可以这样理解,range对象是单元格对象的集合。range对象在表示单元格的时候不可以像cells(i,j)一样range("ij")表示的,这是要注意的一点!2 2.表示一个连续...
With语句可以对某个对象执行一系列的语句,而不用重复指出对象的名称,可以简化代码。With后面应该是一个具体的对象而不是一个对象集合,比如下面示例中的With Range("A2:G8")是正确的,如果写成With Range就是错误的,With里面的属性或方法语句必须以英文句点(.)开头,这个英文句点(.)就代表前面With Range("A2:G8"...
Worksheets("Sheets1").Range("A5:H8").Cells(1,1).Formula = "=Rand()" '为A5单元格设置公式。 使用Union可返回多块区域,即该区域由多个连续的单元格区域所组成。 Union(Range("A1:B2", Range(C3:D4")).Select ' 选定多块区域。 Range.Areas属性将多区域选定内容拆分为单个的Range对象,并将对象返回...