Поиск подходящих данных в двух книгах Excel и форматирование результатов сопоставления для большого набора данных.

Question

Я работаю над проблемой в Excel, в которой мне приходится сравнивать данные в двух отдельных книгах и искать совпадающие фрагменты информации в нескольких столбцах - поскольку отметка времени в строке A не является точным совпадением в обоих рабочие книги. Мне нужно опираться на точки данных из других столбцов в столбец G и форматировать строки, в которых найдено совпадение, определенного цвета.

Я мог бы сделать это вручную, но из-за количества строк, нумерованных до 5 цифр, я думаю, что VBA кажется лучшим способом сделать это. Имея только базовые знания в области программирования, я изо всех сил пытаюсь найти правильный способ сделать это с VBA.

Вот то, что я пробовал до сих пор, и я также включу ошибку, показанную при запуске кода.

Мне известно, что я сказал, что для сравнения нужно больше строки A, но я не уверен, как применять правила к матрице над столбцами и строками.

Sub vbax_53997_Compare_Two_Ranges()
    Dim i As Long
    Dim wb1ws1, wb2ws2
    Dim blnSame As Boolean

    wb1ws1 = Workbooks("Copy_of_data.xlsm").Worksheets("Worksheet").Range("A1:A63").Value
    wb2ws2 = Workbooks("Copy_of_data_to_be_compared.xlsm").Worksheets("Archive").Range("A1:A23067").Value

    For i = LBound(wb1ws1) To UBound(wb1ws1)
        If wb1ws1(i, 1) = wb2ws2(i, 1) Then
            blnSame = True
        End If
    Next i

    If blnSame = True Then
        Sheets(sheetName).Cells(lRow, "A").Interior.ColorIndex = 3  'Set Color to Red'
    End If
End Sub

Это ошибка, когда я запускаю код;

Ошибка времени выполнения '9': нижний индекс выходит за пределы диапазона.

Я не сомневаюсь, что это легко исправить, и я мог бы сделать вложенный оператор vlookup / if, но в краткосрочной перспективе потребуется больше времени для поиска решения, которое, вероятно, будет полезным для автоматизации процесса в долгосрочной перспективе.

Любая помощь будет принята с благодарностью, так как у меня сейчас нет идей.