文件路径控制

Question

如何在VBA前面板中放置文件路径控件？我希望用户能够选择浏览按钮并选择文件路径，而不是在整个地方放置对话框。我需要用户选择三个或更多文件路径。

Answer 1

在重新阅读你的Q之后，它会让你想要远离对话框！哦，我会说

  

我可以发布关于在VBA上使用MSDIAG的黑客攻击，这解释了   如何修补您的注册表   在VBA下使用它，   没有其他MS-VB产品   安装...但我宁愿拥有你   google那一个......你当然可以   理解为什么。

但你不想要对话框......你想要控件和按钮：使用 列表框 ！ 要填充列表框，请使用目录命令（使用列表框的方法 additem ）。 实现这一目标的两个阶段：

• 首先获取目录（并在列表框中添加前加上“ - ＆gt;”或其他前缀，以便用户理解这不是文件）;
• 然后获取文件名（您可以使用Dir的参数通过扩展名进行过滤，就像在DOS中一样）。

最后，在列表框的OnClick和OnDoubleClick下，您必须解释列表框的默认属性（Item），检查“ - ＆gt;”并使用ChDir更改目录并重新填充，或者您将选择文件。

写起来比代码复杂得多......相信我。

Answer 2

您的意思是VBA for Microsoft Office还是普通的VBA？

在办公室，Application.FileDialog(msoFileDialogOpen)。

否则，请查看Win32 API函数SHBrowseForFolder（在shell32.dll中）。您可以使用Declare Function关键字将其导入VBA。

Answer 3

没有直接的VBA功能。您可以决定将表单（Access窗体或通用Microsoft窗体）与2个控件组合在一起：（1）文本框（2）浏览按钮（最终将使用fileDialog命令或Windows API）。

Answer 4

从Microsoft MVP站点浏览文件夹API可能适合：

http://www.mvps.org/access/api/api0002.htm

它使用fwzgekg提到的SHBrowseForFolder，并且不返回文件对话框，它返回一个可浏览的文件夹列表。

Answer 5

这是你想要的吗？

FilePath = Application.GetOpenFilename