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