Skip to content

Instantly share code, notes, and snippets.

Show Gist options
  • Save ezhov-da/c648de9bc2960e589d4c92e23f633a26 to your computer and use it in GitHub Desktop.
Save ezhov-da/c648de9bc2960e589d4c92e23f633a26 to your computer and use it in GitHub Desktop.
vba получение текущего каталога запуска
Set FSO=CreateObject("Scripting.FileSystemObject")
Set file = FSO.GetFile(Wscript.ScriptFullName)
path = FSO.GetParentFolderName(file)
msgbox path
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment