概述

Range和Cells这两个函数，都可以获取单元格内容和将内容写入单元格。既然这两个功能相同，那么速度就成为了选择的关键。

注：Range有着比Cells更强大的内容，大家千万不要把这两个函数完全等同。当然了，这也从侧面反应了速度上必然Range更慢。

测试速度的代码

Sub test()
Dim i As Long
Dim a As String

For i = 1 To 100000 Step 1
    Cells(i, 1) = CStr(i)
Next i

QueryPerformanceCounter m_Start

For i = 1 To 100000 Step 1
' 下面四句中选一句执行
a = Range("A" & CStr(i)) 'Range read
a = Cells(i, 1) 'Cells read
Cells(i, 1) = a 'Cells write
Range("A" & CStr(i)) = a 'Range write
Next i

QueryPerformanceCounter m_Now

Elapsed = 1000 * (m_Now - m_Start) / m_Frequency
Debug.Print Elapsed
End Sub

测试结果

测试结果的时间单位是毫秒。

VBA中Range和Cells的速度

原文：https://www.cnblogs.com/dreamofjay/p/12489311.html