EXCEL宏使用经验集：[4]Range的用法

1、赋值给某单元格：Worksheets("Sheet1").Range("A5").Value = 33Worksheets("Sheet1").Range("A5").Value = "TEST"

2、引用单元格:Dim myRange As Range'设置对单元格区域的引用Set myRange = Worksheets("Sheet1").Range("A1:D5")'对Range对象进行操作myRange.Formula = "=RAND()"myRange.Font.Bold = True

3、清除单元格:Worksheets(1).Range("A1:H8").ClearContentsWorksheets(1).Range("A1:H8").Clear

4、选取单元格区域(Select方法):Worksheets("Sheet1").Range("A1:D5").Select

5、选取多个区域(Union方法):Dim rng1 As Range, rng2 As Range, myMultiAreaRan爿讥旌护ge As RangeWorksheets("sheet1").ActivateSet rng1 = Range("A1:B2")Set rng2 = Range("C3:D4")Set myMultiAreaRange = Union(rng1, rng2)myMultiAreaRange.Select