Excel - 如何将文件选择按钮添加到单元格？

Question

我正在创建一个模型，该模型要求用户在某些单元格中输入模型使用的所需电子表格、文件夹等的地址。

而不是让用户剪切和粘贴地址，我希望在单元格本身中包含某种形式的控件，它会提示用户浏览文件，然后在用户选择后将文件路径返回到单元格好的'。

是否有标准的 Windows 窗体控件可以实现这一点？感觉应该有，但我能找到的只有切换按钮、下拉菜单等？

我知道我可以编写一个自定义脚本来捕获 double_click 事件，任何有关更“本机”方式的指针将不胜感激！

谢谢，

亚当

Answer 1

您可以将表单按钮连接到文件打开对话框。

这允许用户选择文件，但您不必打开它。

Sub GetFile()

Dim varFile As Variant

varFile = Application.GetOpenFilename("Excel files (*.xls), *.xls", , "Select a file", , False)
If varFile = False Then
    Exit Sub
Else
    ActiveCell.Value2 = varFile
End If

End Sub