Excel取得指定分类的文件名

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

Excel获取指定类型的文件名的方法：

首先按“Alt+F11”组合键，Excel2003打开代码编辑器，单击“插入”菜单-“模块”，双击插入的模块，在右侧的代码窗口中输入：
Sub Excel_Partner_t()
Dim myFileName As String
myFileName = Application.GetOpenFilename("文本文件(*.txt), *.txt")
Range("A1") = myFileName
End Sub

按F5运行键运行程序，Excel调用“打开”对话框，在“文件类型”列表框中已经限定为只能打开扩展名为txt的文件。双击指定的文件，Excel获取指定类型的文件名。

输入如下代码：
Sub Excel_Partner_p()
Dim myFileName As String
myFileName = Application.GetOpenFilename("图片文件(*.bmp;*.jpg),* bmp;*.jpg")
Range("A1") = myFileName
End Sub

按F5运行键运行程序，Excel调用“打开”对话框，在“文件类型”列表框中已经限定为只能打开扩展名为bmp或jpg的文件。双击指定的文件，Excel获取指定类型的文件名。