如果要在Excel中编写VBA宏,则可能需要允许用户从磁盘中指定他们想要的文件。幸运的是,您可以从VBA中访问标准的“打开”对话框,并使用它仅返回文件名。以下示例子例程显示了如何完成此操作:

Sub GetFName()

Dim FName As Variant     Dim Msg As String

FName = Application.GetOpenFilename()

If FName <> False Then         Msg = "You chose " & FName         MsgBox Msg     Else         'Cancel was pressed     End If End Sub

当您运行此宏时,您将看到Excel中使用的标准“打开”对话框。用户可以选择一个文件,然后单击“打开”,该文件名(包括完整路径)将分配给变量FName。

如果用户单击“取消”按钮,则FName设置为False。 (因此要测试代码中的内容。)

注意:

如果您想知道如何使用此页面(或_ExcelTips_网站上的任何其他页面)中描述的宏,我准备了一个特殊页面,其中包含有用的信息。

_ExcelTips_是您进行经济高效的Microsoft Excel培训的来源。

本技巧(2272)适用于Microsoft Excel 97、2000、2002和2003。可以在以下功能区中为Excel的功能区界面(Excel 2007及更高版本)找到本技巧的版本: