Окончательный путь к файлу в ячейке с помощью Excel VBA

#vba #excel

#vba #excel

Вопрос:

Мне интересно, как определить конкретный путь к файлу в ячейке с помощью Excel VBA? Я пытаюсь загрузить значение nCount , равное количеству, в другой файл в определенном месте. Так что больше похоже на присвоение значения из ячейки nCount .

 nCount = "G:ABC[FILE FOR 2016-2017.xlsx]Master!$A$1"
  

Это выдает ошибку:

Ошибка времени выполнения ’13:»; «Несоответствие типов

Ответ №1:

Вы можете получить значение из закрытой книги, используя макрос Excel4. Вот типичный пример:

 Sub Sample()
    Dim wbPath As String, wbName As String
    Dim wsName As String, CellRef As String
    Dim Ret As String

    wbPath = "C:TestFolder"
    wbName = "ABC.xls"
    wsName = "xxx"
    CellRef = "B9"

    Ret = "'" amp; wbPath amp; "[" amp; wbName amp; "]" amp; _
          wsName amp; "'!" amp; Range(CellRef).Address(True, True, -4150)

    MsgBox Ret amp; vbCrLf amp; ExecuteExcel4Macro(Ret)

End Sub
  

введите описание изображения здесь