VBA 这个Application.GetOpenFilename具体怎么操作？
GetOpenFilename相当于Excel打开窗口，通过该窗口选择要打开的文件，并可以返回选择的文件完整路径和文件名
此方法并不会真正打开文件， 不能显示文件夹路径FILEDIALOG可以打开此方法不能打开文件，只能返回路径
不能显示文件夹路径
Application.GetOpenFilename(文件类型筛选规则(就是说明)优先显示第几个类型的文件标题是否允许选择多个文件名)
打开类型只限excel文件
设置打开某类文件可以用下面的规则
文件类型说明文字，文件类型后辍Sub t1()Dim f
打开WPS文字，进入excel界面
点击上方工具栏中的开发工具，VB编辑器
进入Microsoft Visual Basic页面，点击工具栏中的插入，用户窗体
出现编辑窗体，在窗体上可通过左侧“工具箱”中的“控件”可在编辑处绘制命令按钮，文字框，标签等编程控件
鼠标单击左侧“工具箱控件”中的“命令按钮”
点击“命令按钮”后将鼠标放置编辑窗体内任意处单击一下，即出现带有“CommandButtonl”的小方框
用鼠标双击“CommandButtonl”出现代码编写窗口，即可开始编写程序
一、概述基本语法
'GetOpenFilename相当于Excel打开窗口，通过该窗口选择要打开的文件，并可以返回选择的文件完整路径和文件名。
'注:
1、此方法并不会真正打开文件?不能显示文件夹路径（FILEDIALOG可以打开）
2、此方法不能打开文件，只能返回路径
3、不能显示文件夹路径
'Application.GetOpenFilename("文件类型筛选规则(就是说明)","优先显示第几个类型的文件","标题","是否允许选择多个文件名")
'二、示例
'1打开类型只限excel文件
'设置打开某类文件可以用下面的规则：
'"文件类型说明文字,*.文件类型后辍"
Subt1()
Dimf
f=Application.GetOpenFilename("Excel文件,*.xls")
MsgBoxf
EndSub
'2、打开多种文件类型(word和excel)
'打开多种文件类型，只需要用","隔开，添加新的文件类型说明和文件类型。如下：1，3为说明文件，2，4为文件类型
'如果没有选择文件，返回FALSE
Subt2()
Dimf
f=Application.GetOpenFilename("Excel2003文件,*.xls,Word文件,*.doc")
MsgBoxf
EndSub
'3打开多种文件类型,默认显示word文件
Subt3()
Dimf
f=Application.GetOpenFilename("Excel2003文件,*.xls,Word文件,*.doc,文本文件,*.txt",2)
MsgBoxf
EndSub
'4设置对话框名称
Subt4()
Dimf
f=Application.GetOpenFilename("Excel2003文件,*.xls,Word文件,*.doc,文本文件,*.txt",2,"选择要汇总的文件")
MsgBoxf
EndSub
Visual Basic for Applications（VBA）是Visual Basic的一种宏语言，是微软开发出来在其桌面应用程序中执行通用的自动化(OLE)任务的编程语言。主要能用来扩展Windows的应用程序功能，特别是MicrosoftOffice软件。也可说是一种应用程式视觉化的Basic 脚本。该语言于1993年由微软公司开发的的应用程序共享一种通用的自动化语言--------Visual Basic For Application(VBA)，实际上VBA是寄生于VB应用程序的版本。
微软在1994年发行的Excel5.0版本中，即具备了VBA的宏功能。
VBA和VB的区别包括如下几个方面：
1、VB是设计用于创建标准的应用程序，而VBA是使已有的应用程序(EXCEL等)自动化。
2、VB具有自己的开发环境，而VBA必须寄生于已有的应用程序。
3、要运行VB开发的应用程序，用户不必安装VB，因为VB开发出的应用程序是可执行文件(*.EXE)，而VBA开发的程序必须依赖于它的父应用程序，例如EXCEL。
4、VBA是VB的一个子集。
