返回首页
当前位置: 主页 > Excel教程 > Excel VBA教程 >

Excel获取指定路径的文件名 vba代码

时间:2015-06-23 22:42来源:Office教程学习网 www.office68.com编辑:麦田守望者

在Excel VBA中,如果需要Excel获取指定路径的文件名以方便用户的操作体验,可通过VBAExcel获取指定路径的文件名。Excel2003可通过VBA宏Excel获取指定路径的文件名。

Excel获取指定路径的文件名的方法:

首先按“Alt+F11”组合键,Excel2003打开代码编辑器,单击“插入”菜单-“模块”,双击插入的模块,在右侧的代码窗口中输入:
Sub Excel_Partner()
Dim myFilename As String, myPath As String
ChDir Application.DefaultFilePath '改变默认路径
myPath = "C:\" '指定的任意路径
SendKeys myPath & "{TAB}" '将指定的任意路径发送到“打开”对话框
myFilename = Application.GetOpenFilename
Range("A1") = myFilename
End Sub

按F5运行键运行程序,Excel调用“打开”对话框,自动打开指定的路径。双击指定的文件,Excel获取指定路径的文件名。

相关说明: 当输入法处于中文输入法状态时,将不能打开指定的路径。

------分隔线----------------------------
标签(Tag):excel excel2007 excel2010 excel2013 excel2003 excel技巧 excel教程 excel实例教程
------分隔线----------------------------
推荐内容
猜你感兴趣