如何使用VBA调用Powershell脚本

Question

任何人都可以提供帮助，如何将powershell脚本的当前文件路径分配给变量和使用VBA调用的变量。下面是一个可以工作但希望通过变量替换文件路径的脚本。

Private Sub Submit()
Dim retval

retval = Shell("powershell.exe -ExecutionPolicyBypass 
""C:\LogMagic\Invoke.ps1""", vbNormalFocus)
End Sub