2 простые процедуры. Одна вызывает другую. Что не так? - VB

Формулировка задачи:

Public Sub Âñòàâèòü_èç_äð_òàáëèöû_ïðè_ñîâïàäåíèè(targetTableName As String, targetSheet As String, _
        srcCol As String, srcRow As Integer, colForSearchInTgTbl As String, _
        columnToExtractInTgTbl As String, columnToInsertInCurrTbl As String)
        
    Set targetSheet = Workbooks(targetTableName).Worksheets(targetSheet)
    Set dataForSearch = ActiveSheet.Cells(srcRow, srcCol)
    For i = 1 To targetSheet.Rows.Count
        If targetSheet.Cells(i, colForSearchInTgTbl) = dataForSearch Then
            ActiveSheet.Cells(srcRow, columnToInsertInCurrTbl) = targetSheet.Cells(i, columnToExtractInTgTbl)
        End If
    Next i
End Sub

Public Sub Âñòàâèòü_èç_Òàáëèöà_Òóàïñå_îôîðìëåííàÿ_ïðè_ñîâïàäåíèè_äëÿ_òåê_çíà÷()

    Âñòàâèòü_èç_äð_òàáëèöû_ïðè_ñîâïàäåíèè("Òàáëèöà_Òóàïñå_îôîðìëåííàÿ.xlsm", "Òóàïñå", _
                                            "N", ActiveCell.Row, "E", "A", "O")
                                            
End Sub

Что должно происходить. Excel. Макрос(?). Для текущей строки на текущем листе текущей таблицы берётся значение в ячейке столбца N. Далее в другой таблице просматривается столбец E. В случае совпадения, берётся значение ячейки столбца A совпавшей строки и вставляется в ячейку столбца O текущей таблицы, текущей строки.

Âñòàâèòü_èç_äð_òàáëèöû_ïðè_ñîâïàäåíèè("Òàáëèöà_Òóàïñå_îôîðìëåííàÿ.xlsm", "Òóàïñå", _
                                            "N", ActiveCell.Row, "E", "A", "O")

- редактор подсвечивает красным. требует :=
Если написать (заведомо бред)

Set a = Âñòàâèòü_èç_äð_òàáëèöû_ïðè_ñîâïàäåíèè("Òàáëèöà_Òóàïñå_îôîðìëåííàÿ.xlsm", "Òóàïñå", _
                                            "N", ActiveCell.Row, "E", "A", "O")

, то возникает ошибка во время выполнения.
Как правильно. И отличаются ли чем-нибудь := от =?

Решение задачи: «2 простые процедуры. Одна вызывает другую. Что не так?»

textual
                            Листинг программы 
                        
                            Dim targetSheet as Worksheet
Set targetSheet = Workbooks(targetTableName).Worksheets(targetSheetName)