IT编程技术

天行健，君子以自强不息；地势坤，君子以厚德载物；

ExcelVBA实战【第六期】-​使用Range属性引用单元格区域

2021-11-17 博主：Splendor EXCEL VBA实战

使用Range属性引用单元格区域

Sub Demo()
      Range("A1:B4,D5:E8").Select
      Range("A1").Formula = "=Rand()"
      Range("A2:B4,B2:C6").Value = 10
      Range("A1", "B4").Font.Italic = True
End Sub
【代码解析】
1，Range("A1:B4,D5:E8").Select  '选中单元格A1:B4,D5:E8这两个区域的单元格
2，Range("A1").Formula = "=Rand()"  ’给A1单元格添加随机函数
3，Range("A2:B4,B2:C6").Value = 10   '给A2:B4,B2:C6这两个区域填充数值10
4，Range("A1", "B4").Font.Italic = True  '  Range("A1", "B4")这种方式等同于Range("A1:B4")给这个区域设置斜体

【ExcelDemo文件】
Demo.xlsm

标签: ExcelVBA实战

« ExcelVBA实战【第七期】-​使用cells属性引用单元格区域 | Excel函数第八期：一招教你快速求1~N累加求和»