您的位置: 首页 > EXCEL技巧 > ExcelVBA >

用VBA获取系统特殊文件夹路径

时间:2013-12-04 整理:docExcel.net

Windows 特殊文件夹,包括 "Desktop" 文件夹、"MyDocuments" 文件夹等,如果我们要在VBA中用到这些文件夹,可以用下列代码来获取这些特殊文件夹的路径。

Option Explicit
Sub GetMyDocumentsPath()
  Dim WSHShell As Object
  Set WSHShell = CreateObject("Wscript.  Shell") '请去掉Shell前的空格
  MsgBox "MyDocuments文件夹位于:" & WSHShell.SpecialFolders("MyDocuments")
  Set WSHShell = Nothing
End Sub

说明:上述代码获取的是“MyDocuments”文件夹的路径,如果要获取其他特殊文件夹路径,可以将代码中的“MyDocuments”更换为下面的文件夹名称。如果指定的文件夹不存在,“SpecialFolders”属性返回空值。
这些特殊文件夹有:

AllUsersDesktop
AllUsersStartMenu
AllUsersPrograms
AllUsersStartup
Desktop
Favorites
Fonts
MyDocuments
NetHood
PrintHood
Programs
Recent
SendTo
StartMenu
Startup
Templates

用VBA获取文件夹中的文件列表 问题:用VBA获取文件夹中的文件列表
回答:如果我们要在Excel中获取某个件夹中所有的文件列表,可以通过下面的VBA代码来进行。代码运行后,首先弹出一个浏览件夹对话框,然后新建一个工作簿,并在工作表的A至F列分别列出选定件夹中的所有文件文件名、文...
Excel2010基础教程:快速提高Excel效率的十个技巧 问题:Excel2010基础教程:快速提高Excel效率的十个技巧
回答:...电脑”打开C盘的Windows目录,然后进入“启动”件夹,该文件路径是“开始菜单——>所有程序——>启动件夹”。打开此件夹后,这时打开Excel所在的件夹,用鼠标将Excel图标拖到“启动...
十二则 Excel操纵效率大大 问题:十二则 Excel操纵效率大大
回答:...ows目次,依照路径“Start MenuPrograms启动”来打开“启动”件夹。 若您日常事情中要常常利用Excel,可以在启动Windows时启动它,配置:0 模板是一用来作为建设其它事情簿的框架形式,操作它可以快速地建设相似的事情...
Word模板路径位置在哪 问题:Word模板路径位置在哪
回答:...”中“地址栏”,然后回车,即可打开模板路径件夹。这里的“Administrator”是用户名,默认是Administrator,如果您使用的是其他用户名请对照更改您使用的用户名。 Word2003中修改模板默认路径 ①单击菜单栏上...
《Excel表格的基本操作》教程 问题:《Excel表格的基本操作》教程
回答:...4、快速查找 15、修改默认文件生存路径 16、指定打开的件夹 17、在多个Excel事情簿间快速切换 18、快速获取辅佐 19、建设辅佐文件的快捷 20、双击单位格某边移动选定单位格 21、双击单位格某边选取单位格区域 22、快速...
如何修改Word“文档”和“模板”等默认自动保存 问题:如何修改Word“文档”和“模板”等默认自动保存
回答:...可想而知。要养成一个良好的习惯首先我们可以建立一个件夹用来装所以的Word文档,这里给大家提供一个非常方便的技巧“修改Word文档和模板的默认保存路径”,当然这个路径我们可以自己去设置。既可以节省手动修...
相关推荐: