Открыть файл в среде vba Excel

Question

Я собираюсь использовать этот код, чтобы открыть мой файл.Но, похоже, это ошибка в моей последней строке (myShell.Run "path").

Мой код:

Sub open_path()

Dim path As String

path = ActiveCell.Value

Dim myShell As Object

Set myShell = CreateObject("WScript.Shell")

myShell.Run "path" 'this line is error

End Sub

Можно ли указать адрес в качестве переменной?

Answer 1

Попробуйте следующее исправление

Sub open_path()

    Dim path As String

    path = ActiveCell.Value

    Dim myShell As Object

    Set myShell = CreateObject("WScript.Shell")

    myShell.Run Chr(34) & path & Chr(34)

End Sub