Range() VS Cells() - 运行时间

在Excel VBA编程中，我们经常会用到Range()和Cells()这两个函数来操作单元格。这两个函数虽然都可以用来引用单元格，但在一些情况下它们的使用方式和运行时间是不同的。本文将介绍Range()和Cells()函数的区别，并通过案例代码来展示它们的使用。

Sub RangeExample()
    Range("A1").Value = "Hello, Excel VBA!"
    Range("A1").Font.Bold = True
    Range("A1").Interior.Color = RGB(255, 0, 0)
End Sub

Sub CellsExample()
    Cells(1, 1).Value = "Hello, Excel VBA!"
    Cells(1, 1).Font.Bold = True
    Cells(1, 1).Interior.Color = RGB(255, 0, 0)
End Sub

Sub RangeVsCells()
    Dim rng As Range
    Dim cell As Range
    Dim i As Integer
    
    ' 使用Range()函数
    Set rng = Range("A1:A10000")
    For Each cell In rng
        cell.Value = Int((10000 - 1 + 1) * Rnd + 1)
    Next cell
    
    ' 使用Cells()函数
    For i = 1 To 10000
        Cells(i, 1).Value = Int((10000 - 1 + 1) * Rnd + 1)
    Next i
End Sub