EXCEL VBA 选择文件对话框
来源:互联网 发布:国家安监网络干部培训 编辑:程序博客网 时间:2024/05/22 00:52
Sub XXX() Dim arr() arr = Application.GetOpenFilename("所有支付文件 (*.xls;*.xlsx;*.csv),*.xls;*.xlsx;*.csv,Excel 文件 (*.xls),*.xls,Excel2007 文件 (*.xlsx),*.xlsx,CSV 文件 (*.csv),*.csv", , "选择文件", , True) For i = LBound(arr) To UBound(arr) Cells(i, 1).Value = arr(i) NextEnd Sub
以上例子为文件多选
以下是MICROSOFT的原文
Application.GetOpenFilename 方法显示标准的“打开”对话框,并获取用户文件名,而不必真正打开任何文件。语法
表达式.GetOpenFilename(FileFilter,FilterIndex, Title, ButtonText, MultiSelect)
表达式 一个代表 Application 对象的变量。
参数
返回值
Variant
说明
在 FileFilter 参数中传递的该字符串由文件筛选字符串对以及后跟的 MS-DOS 通配符文件筛选规范组成,中间以逗号分隔。每个字符串都在“文件类型”下拉列表框中列出。例如,下列字符串指定两个文件筛选 - 文本和加载宏:“文本文件 (*.txt),*.txt,加载宏文件 (*.xla),*.xla”。
要为单个文件筛选类型使用多个 MS-DOS 通配符表达式,需用分号将通配符表达式分开。例如:“Visual Basic 文件 (*.bas; *.txt),*.bas; *.txt”。
如果省略 FileFilter,则此参数默认为“所有文件 (*.*),*.*”。
本方法返回选定的文件名或用户输入的名称。返回的名称可能包含路径说明。如果 MultiSelect 为 True,则返回值将是一个包含所有选定文件名的数组(即使仅选定了一个文件名)。如果用户取消了对话框,则该值为False。
本方法可能更改当前驱动器或文件夹。
- EXCEL VBA 选择文件对话框
- VBA-选择文件对话框
- VBA文件对话框的应用(VBA打开文件、VBA选择文件、VBA选择文件夹)
- VBA文件对话框的应用(VBA打开文件、VBA选择文件、VBA选择文件夹)
- VBA自定义函数-选择文件对话框
- 用Excel VBA选择文件、打开文件
- 用Excel VBA选择文件、打开文件
- EXCEL-VBA:调用打开文件夹对话框,选择路径
- 使用VBA操作文件(1):使用Excel对话框
- EXCEL-VBA:弹出对话框,打开文件(指定扩展名)
- Excel VBA选择文件、高容错性地打开文件
- 如何用VBA打开选择文件和选择路径的对话框
- VBA EXCEL 文件合并
- Excel-VBA文件操作
- excel 合并文件 vba
- Excel VBA保存文件
- VBA excel文件合并
- VBA保存Excel文件
- J2ME中横竖屏切换知识小结
- 我的收藏夹
- Eclipse 快捷键
- poj 1936 All in All
- Http协议从客户端到浏览器端要干的活
- EXCEL VBA 选择文件对话框
- 一个立志终身学习的菜鸟之-------学习历程
- Hibernate中get和load方法的区别<转>
- reloadData should be in main thread
- Linux GCC常用命令
- Error, some other host already uses address
- 网络营销与电子商务
- WPF 中如何实例化只实例化一个
- linux 下 自己写的 html文件产生中文乱码问题 解决办法