【烟花原创】VBA零基础之第162篇 各种对话框之文件选择对话框（三）

hwc2ycy

2.Application.GetOpenFilename方法

显示标准的“打开”对话框，并获取用户文件名，而不必真正打开任何文件。

语法：Application.GetOpenFilename(FileFilter, FilterIndex, Title, ButtonText,MultiSelect)

FileFilter 可选，一个指定文件筛选条件的字符串。

FilterIndex 可选，指定默认文件筛选条件的索引号，取值范围为 1 到由 FileFilter 所指定的筛选条件数目。如果省略该参数，或者该参数的值大于可用筛选条件数，则使用第一个文件筛选条件。

Title 可选，指定对话框的标题。如果省略该参数，则标题为“打开”。

ButtonText 可选，仅限 Macintosh。

MultiSelect 可选，是否允许选择多个文件，默认值为False。

注意：

FileFilter包含二部分：1>是文件类型描述信息，2>是MS-DOS 通配符。这二部分中间以逗号分隔。

每个字符串都在“文件类型”下拉列表框中列出。

例如，“文本文件 (*.txt),*.txt,加载宏文件 (*.xla),*.xla”。

文本文件 (*.txt),加载宏文件 (*.xla)是文件类型描述信息

*.txt,*.xla是通配符

要为单个文件筛选类型使用多个 MS-DOS 通配符时，需用分号将通配符表达式分开。
例如：“Visual Basic 文件 (*.bas; *.txt),*.bas; *.txt”。

如果省略 FileFilter，则此参数默认为“所有文件 (*.*),*.*”。

本方法返回选定的文件名或用户输入的名称。返回的名称可能包含路径说明。

如果 MultiSelect 为 True，则返回值将是一个包含所有选定文件名的数组（即使仅选定了一个文件名）。
如果用户取消了对话框，则该值为 False。

本方法可能更改当前驱动器或文件夹。

示例：

huangcaiguang

{:35:}

yewei113

支持

我的一生141314

支持

tingfeng461002

文件选择对话框（三）：Application.GetOpenFilename方法