VBA中操作工作表的重点Range,Range有什么注意事项

Range对象是包含在Worksheet的对象中。Range对象表示的就是工作表中的单元格或者单元格的区域。

1. 给工作表中的单元格赋值:

代码1:

Sub R()

Worksheets('sheet41').Range('A1') = 1000

End Sub

代码2:

Sub R()

Worksheets('sheet41').Range('A1').Value = 1000

End Sub

注意:对比二个代码Range对象的Value属性不写就是默认的。

2. 给工作表中的A1到A20赋值

代码3:

Sub R()

Worksheets('sheet41').Range('A1:A20').Value = 2000

End Sub

下面解释一下代码:

如果Range对象的参数不是一个中间就需要使用英文的分隔符号。

3. 选择工作的指定单元格区域需要使用属性Select。

代码4:

Sub R()

Worksheets('sheet41').Range('A1:A20,B1:B20').Select

End Sub

注意:需要选择不同的区域也是一样的,使用英文的逗号隔开。

下面举个简单的例子:

代码5:

Sub R()

Dim i As Variant

Dim j As Integer

i=1

j = 1

For Each i In Range('A1:A20')

If j Mod 2 = 0 Then

i.Value = j

End If

If j Mod 2 <> 0 Then

i.Interior.Color = RGB(0, 0, 255)

End If

j = j + 1

Next

End Sub

下面具体解释一下代码:

(0)

相关推荐