VBA 这个Application.GetOpenFilename 的用法 举个例子 谢谢让我知道怎么操作
GetOpenFilename相当于Excel打开窗口，通过该窗口选择要打开的文件，并可以返回选择的文件完整路径和文件名
此方法并不会真正打开文件， 不能显示文件夹路径FILEDIALOG可以打开此方法不能打开文件，只能返回路径
不能显示文件夹路径
Application.GetOpenFilename(文件类型筛选规则(就是说明)优先显示第几个类型的文件标题是否允许选择多个文件名)
打开类型只限excel文件
设置打开某类文件可以用下面的规则
文件类型说明文字，文件类型后辍Sub t1()Dim f
打开WPS文字，进入excel界面
点击上方工具栏中的开发工具，VB编辑器
进入Microsoft Visual Basic页面，点击工具栏中的插入，用户窗体
出现编辑窗体，在窗体上可通过左侧“工具箱”中的“控件”可在编辑处绘制命令按钮，文字框，标签等编程控件
鼠标单击左侧“工具箱控件”中的“命令按钮”
点击“命令按钮”后将鼠标放置编辑窗体内任意处单击一下，即出现带有“CommandButtonl”的小方框
用鼠标双击“CommandButtonl”出现代码编写窗口，即可开始编写程序
Application.GetOpenFilename
就是让你手工选择文件的。
如果自动选择的话用dir函数查找需要的文件类型，获得文件位置，自动打开。
或者写死文件位置，自动打开。
GetOpenFilename相当于Excel打开窗口，通过该窗口选择要打开的文件，并可以返回选择的文件完整路径和文件名
此方法并不会真正打开文件， 不能显示文件夹路径FILEDIALOG可以打开此方法不能打开文件，只能返回路径
不能显示文件夹路径
Application.GetOpenFilename(文件类型筛选规则(就是说明)优先显示第几个类型的文件标题是否允许选择多个文件名)
打开类型只限excel文件
设置打开某类文件可以用下面的规则
文件类型说明文字，文件类型后辍Sub t1()Dim f
朋友，我发给你的附件中不就是例子吗！其实也就几个参数而以；
你可以偿试改下里面的参数，会存现不动的效果；我把几个参的详细给你说下吧：全部是我以前自己学习的时候总结的。
一、概述基本语法
'GetOpenFilename相当于Excel打开窗口，通过该窗口选择要打开的文件，并可以返回选择的文件完整路径和文件名。
'注:
1、此方法并不会真正打开文件? 不能显示文件夹路径（FILEDIALOG可以打开）
2、此方法不能打开文件，只能返回路径
3、不能显示文件夹路径
'Application.GetOpenFilename("文件类型筛选规则(就是说明)","优先显示第几个类型的文件","标题","是否允许选择多个文件名")
'二、示例
'1 打开类型只限excel文件
'设置打开某类文件可以用下面的规则：
'"文件类型说明文字,*.文件类型后辍"
Sub t1()
Dim f
f = Application.GetOpenFilename("Excel文件,*.xls")
MsgBox f
End Sub
'2、打开多种文件类型(word和excel)
'打开多种文件类型，只需要用","隔开，添加新的文件类型说明和文件类型。如下：1，3为说明文件，2，4为文件类型
'如果没有选择文件，返回FALSE
Sub t2()
Dim f
f = Application.GetOpenFilename("Excel2003文件,*.xls,Word文件,*.doc")
MsgBox f
End Sub
'3 打开多种文件类型,默认显示word文件
Sub t3()
Dim f
f = Application.GetOpenFilename("Excel2003文件,*.xls,Word文件,*.doc,文本文件,*.txt",2)
MsgBox f
End Sub
'4 设置对话框名称
Sub t4()
Dim f
f = Application.GetOpenFilename("Excel2003文件,*.xls,Word文件,*.doc,文本文件,*.txt",2, "选择要汇总的文件")
MsgBox f
End Sub
call msgbox ("现在打开的文件名是："+Application.GetOpenFilename)
蓟享复方： Application就是EXCEL程序的意思,许多EXCEL的功能、常量、选项、动作都是通过这个对象来访问.
灵山县13854037036： 求大神帮我解释一下下边VBA代码中 Application.是什么意思,有什么用 - ？
蓟享复方： Application是vba的内置的最高层及对象 下属有无数个方法可以调用 inputbox只是其中一个
灵山县13854037036： excel vba 中的Application具有什么作用? - ？
蓟享复方： “excel高级培训讲师朱仕平” 的回答 言简意赅!就是第2条,虽然说的不错,但是有一些意犹未尽.基本函数嵌套使用 既麻烦又易出错,有些循环、判断又无法使用,用vba则既轻松又容易检查、修改,功能还十分强大.不知是否说到位了.
灵山县13854037036： VBA中的Application.Calculate是怎么用的,在什么情况下需要用这个?Option Explicit'You can use the =now() function to get the time,'but then you have to ... - ？
蓟享复方：[答案] Calculate 公式重算 他之前 不是在当前单元格输入了 =now() 吗 为了重算这个公式的, 基本没什么用, 你删掉试试就知道了,Private Sub Worksheet_Change(ByVal Target As Range) Application.EnableEvents = Fals...
灵山县13854037036： VBA是做什么用的, - ？
蓟享复方： 是visual basic application 的缩写,应用于office等工具的二次开发,可以说是vb的超集.
灵山县13854037036： VBA中application对象的主要作用 - ？
蓟享复方： 用户可以使用Application 对象的属性或方法来控制或返回应用程序范围内的特性、控制应用程序窗口的外观或者调整Word 对象模型的其他方面.可以使用Application属性来返回Word Application 对象.以下的示例从视图状态切换到打印预览状态. Application. PrintPreview = True
灵山县13854037036： (急)VBA程序的建立,编辑和运行方法? - ？
蓟享复方： VBA概述:VBA是Visual Basic For Application的缩写,是VB在office中的运用.是基于Visual Basic For Windows发展而来的,VB For Windows是Microsoft于1992年推出的开发Windows应用程序的程序设计语言,由于基语法简单,易学易用,...
灵山县13854037036： Excel 关于对象中的VBA和application的区别 - ？
蓟享复方： Application 对象 代表整个 Microsoft Excel 应用程序.说明 Application 对象包括:应用程序范围的设置和选项.返回顶级对象的方法,如 ActiveCell 和 ActiveSheet 等.示例 使用 Application 属性可返回 Application 对象.下例对 Application 对象...
灵山县13854037036： excel 中的VBA怎样连接OUTLOOK - ？
蓟享复方： 连接OUTLOOK?干嘛呀?Excel中VBA使用详谈 VBA概述:VBA是Visual Basic For Application的缩写,是VB在office中的运用.是基于Visual Basic For Windows发展而来的,VB For Windows是Microsoft于1992年推出的开发Windows应用程序...
灵山县13854037036： 一直不太明白: vba中函数前到底是加 application 还是application.workfunction, 到底有什么讲究? - ？
蓟享复方： WorksheetFunction是对Application里面部分工作表函数的再封装,本质仍然是一个函数,但是调用的方式有不同之处. 推荐用application.sum而不使用application.workfunction.sum. 终究来说,多一个封装,那么运行所耗的时间也要长一些.
