GetOpenFilename 方法返回所选择的文件名或者用户输入的文件名，返回的名称包含文件路径。如果参数 MultiSelect 为 True，则返回由所选文件名组成的数组（即使只选择了一个文件名）。如果用户单击“取消”关闭对话框，则返回 False。示例 1：显示打开对话框和选择的文件名 下面的代码显示“打开”对话框，并列出文件夹...
Workbooks.Open selectedFile '或者 ' MsgBox "你选择的文件是: " & selectedFile Else '用户取消了操作 MsgBox "用户取消了选择文件操作。" End If End Sub 上述代码的主要步骤: 1.使用Application.GetOpenFilename函数调用“打开文件”对话框。 2.参数是一个字符串,用于指定可供用户选择的文件类型,格式为"文件...
如果，在打开对话框中没有单击确定按钮，也就是没有选择任何文件，单击了取消按钮的时候，GetOpenFilename方法返回False。根据返回值，就可以对程序过程进行一个判断，是传递文件名还是进行其它操作。下图为另一个方法，实现保存文件名返回。语法：Application.GetSaveAsFilename (InitialFilename, FileFilter, FilterIndex, ...
默认值为。 例如使用GetOpenFilename获得用户要用的文件路径,使用getobject获取对象,并将其set为w,并将路径记录在a1单元格中。 用户使用多个文件的情况下,可以逐个选择文件,也可以将所有文件名称都写入a列,方便后续查找对应文件。 判断用户文件的一种方法:
f = Application.GetOpenFilename("Excel2003文件,*.xls,Word文件,*.docx,文本文件,*.txt", 2) '设置了第二个文件类型优先,所以优先显示*.doc MsgBox f End Sub ③第三个参数,设置对话框名称,选填,不填默认叫“打开”。 例3 设置对话框名称为“选择要汇总的文件” ...
以下为大家继续介绍一下GetOpenFilename方法的参数设置。 其主要参数如下: 1. FileFilter:限定文件类型,例如此处只设置可选Excel类型的文件。 执行之后,在可选文件类型就只有设置好的类型。 2. FilterIndex:设置的限定文件类型的默认值,如上图中,默认为类型1,当我们设置FilterIndex为2时,默认即为类型2。
FileToOpen = Application.GetOpenFilename("文本文件(*.txt),*.txt") If FileToOpen <> False Then MsgBox "想要打开文件: " & FileToOpen End If End Sub 运行代码后的效果如图1所示。 图1 示例2:获取单个或者多个工作簿文件名 下面...
Application.GetOpenFilename 方法 显示标准的“打开”对话框,并获取用户文件名,而不必真正打开任何文件。 语法 表达式.GetOpenFilename(FileFilter, FilterIndex, Title, ButtonText, MultiSelect) 表达式 一个代表 Application 对象的变量。 参数 返回值 Variant ...
Workbooks.OpenFilename:="I:\09. Excel\01.解读Excel VBA\Excel VBA解读(81):工作表事件示例\excelvba81.xlsm" End Sub 打开后的工作簿excelvba81.xlsm成为当前工作簿。 示例代码2:将打开的工作簿赋值给变量 下面的代码将打开的工作簿赋给对...
理解GetOpenFilename函数的作用和参数: GetOpenFilename方法用于显示标准的“打开”对话框,允许用户选择一个或多个文件,而无需实际打开这些文件。 它的主要参数是一个可选的文件筛选器字符串,用于指定对话框中显示的文件类型。编写VBA代码以调用GetOpenFilename函数: 下面是一个简单的VBA代码示例,展示了如何使用Get...