要知道vba 获取文件夹路径的方法，首先要弄明白获取的文件夹是哪个文件夹，只有明白了要求才好有的放矢。下面，小编就分类别给大家介绍一下几种文件夹路径的获取方法，希望能对大家有所帮助。
工具/原料
vba
一、获取本文件所在的文本夹路径
1、在excel文件中，要获取本文件保存所在目录文本夹的路径，可通过以下代码来获取：Subs()Dimpth$pth=ThisWorkbook.PathMsgBox"本文件的路径为："&pthEndSub
2、在word文件中，要获取本文件保存所在目录文本夹的路径，可通过以下代码来获取：Subs()Dimpth$pth=ThisWorkbook.PathMsgBox"本文件的路径为："&pthEndSub
二、获取FileDialog打开文件夹路径
1、很多时候，我们需要用于FileDialog对话框来龅歧仲半打开文件夹，那么怎么获取打开的文件夹路径呢？可以使用下面的代码来获取：Sub test烫喇霰嘴() Set fileDlg = Application.FileDialog(msoFileDialogFolderPicker) With fileDlg If .Show = -1 Then For Each fld In .SelectedItems MsgBox fld Next fld End If End WithEnd Sub
三、获取系统文件夹目录路径
1、操作系统中会默认定义一些系统变量，vbs中可以对这样变量进行读取，从而获取这个系统文件夹目录路径。如Environ("SYSTEMDRIVE")，可返回系统根目录所在盘符。
2、又比如 Environ("SYSTEMROOT")函数，可返回系统根目录文件夹的路径；Environ("TEMP")函数，可返回系统默认临时目录文件夹的路径。
3、还比如，Environ("HOMEPATH")函数，可以返回当前登录用户主目录所在路径（不含盘符）。Environ("HOMEDRIVE")函数，可以返回当前登录用户主目录所在盘符。
4、……等等！还有很多其它的系统变量，具体操作大家可以在cmd命令行窗口中，运行“set”命令，来查看当前系统主要有哪些系统变量。然后，大家用Environ函数调用相应变量名即可。
