VBA学习13_Range对象

Cells

Cells(r,c)是一种找到单元格对象的方法,而不是单元格对象的本身

Range

Range属性:

返回任意一个单元格范围

Range("D5")
Range("B3:F7")
Range("A2,B7:F9,C8:D6")
1
2
3

Sub Range对象示例1()
	Dim r As Range
	Set r = Range("A3")	
End Sub 
1
2
3
4

Sub Range对象示例2()
	Dim r As Range
	Set r = Range("A3:B7")	
End Sub 
1
2
3
4

Sub Range对象示例3()
	Dim r As Range
	Set r = Range("A3:B7,D6,A2:F4")	
End Sub 
1
2
3
4

Sub Range对象示例4()
	Dim r As Range
	Set r = Range(Cells(2,3),Cells(5,7))	
End Sub 
1
2
3
4

Range.Value

表示单元格的内容
(.Value) 常省略不写

a = r.value : 让 a 等于 r 范围内左上角单元格的内容
r.value = a : 让 r 范围内的所有单元格的内容都变成 a

Range.Font 属性:

可以使用Font 的各种属性.
控制该Range内所有单元格的字体

常见属性

Range.Font.Color :文字颜色
	# Range.Font.Color = RGB(255,0,0)
Range.Font.Size : 文字大小
	# Range.Font.Size = 15
Range.Font.Bold: 是否粗体
	# Range.Font.Bold = True/False
Range.Font.Italic: 是否斜体
	# Range.Font.Italic = True/False
1
2
3
4
5
6
7
8

Range.Interior 属性

单元格的内部特点:
比如颜色: Range.Interior.Color
比如填充模块: Range.Interior.Pattern

Range.Clear 属性

Range.ClearContents: 清除内容, 保留格式
Range.ClearFormats: 清除格式, 保留内容
Range.Clear: 内容和格式全部清除
1
2
3

Range.Merge合并单元格

Range.Merge:
Range.UnMerge: 
1
2