ExecuteExcel4Macro интерпретирует столбцы (> 20) как 0

Question

Я запускаю немного кода, который извлекает данные из закрытой книги. Он работает нормально для каждого столбца до 20, а затем интерпретирует все значения в столбце> 20 как 0.

Я уже скопировал записи в столбце 30 в столбец 20, и это интерпретируется очень хорошо. Кажется, что executeexcel4macro ограничен работой на странице в «представлении». Как я могу это исправить, чтобы макрос работал для каждой ссылки на ячейку независимо от того, насколько велик номер столбца?

Это связано с настройками страницы? Например, какой должен быть диапазон напечатанного листа?

    Function xl4Value(strParam As String) As Variant
xl4Value = ExecuteExcel4Macro(strParam)
End Function

    Dim intRow As Integer, intCol As Integer
    Dim strSource As String
    Dim Path As String
    Dim Register As String
    Dim Check As Variant

    Path = "K:\Data\PRD-DEx\ePPC"
    Register = "Beschichtungsdaten"

    For intRow = 6 To 105
    intCol = 20
    strSource = _
    "'" & _
    Path & _
    "\[" & Charge & ".xls" & _
    "]" & Register & _
    "'!R" & intRow & "C" & intCol

    check = xl4Value(strSource)

    Next intRow

Я использую проверку только, чтобы прочитать, какая запись при отладке Переменная Charge является частью структуры Name файла и определена в другом месте.

По сути, он должен просто дать мне значения, которые находятся в столбце 30 и строках с 6 по 105 на листе Beschichtungsdaten.