比较多张表格中单元格的最快方法

Question

我有10张纸和1张“底座”纸。我想比较“基础”表中Range("A1").value的值与其他10张表（与基础相同的单元格）。什么是最快，最有效的方法？谢谢，

Answer 1

尝试这个简短的子程序。

Sub base_test()
    Dim w As Long
    For w = 1 To Sheets.Count
        If LCase(Sheets(w).Name) <> "base" Then
            If Sheets(w).Range("A1") = Sheets("Base").Range("A1") Then
                'do something
            End If
        End If
    Next w
End Sub

我更喜欢这种方法，因为它不依赖于On Error Resume Next。