VBA学习13_Range对象

Cells

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

Range

Range属性:

返回任意一个单元格范围

Range("D5")
Range("B3:F7")
Range("A2,B7:F9,C8:D6")
Sub Range对象示例1()
	Dim r As Range
	Set r = Range("A3")	
End Sub 
Sub Range对象示例2()
	Dim r As Range
	Set r = Range("A3:B7")	
End Sub 
Sub Range对象示例3()
	Dim r As Range
	Set r = Range("A3:B7,D6,A2:F4")	
End Sub 
Sub Range对象示例4()
	Dim r As Range
	Set r = Range(Cells(2,3),Cells(5,7))	
End Sub 

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

Range.Interior 属性

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

Range.Clear 属性

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

Range.Merge合并单元格

Range.Merge:
Range.UnMerge: 
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包

打赏作者

pigerr杨

你的鼓励将是我创作的最大动力

¥1 ¥2 ¥4 ¥6 ¥10 ¥20
扫码支付:¥1
获取中
扫码支付

您的余额不足,请更换扫码支付或充值

打赏作者

实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值