首页 > Excel专区 > Excel函数 >

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

Excel函数 2023-01-13

在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获取指定路径的文件名。

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


Copyright © 2016-2023 office学习教程网 office.tqzw.net.cn. All Rights Reserved.