问在VBA中，如何在Microsoft Access 2007的导航窗格中获取选定对象的列表？
EN

Stack Overflow用户

提问于 2013-09-16 21:52:44

回答 1查看 1.7K关注 0票数 2

在Microsoft Access 2007的VBA代码中，用户可以通过以下方式了解通过单击导航窗格选择的对象：

dim strObjName as String, lObjType as Long
strObjName = Application.CurrentObjectName
lObjType = Application.CurrentObjectType

通过这种方式只能选择单个对象。

现在我想选择多个对象，例如，从后端SQL Server导出几个选定的表以.sql文本文件的形式创建供网站使用的MySQL表，该后端SQL Server用于我们的物理存储管理。

这是屏幕截图:在导航窗格中，尝试将选定的对象标记为棕色bg颜色。

我的问题是，在Visual Basic for Application中，如何通过按住Shift键并单击来获取导航窗格中选定的对象列表，以便同时选择几个对象，如图所示，以棕色背景颜色标记Access 2007，其方式如下：

dim xObjs
Set xObjs = Application.SelectedObjects ' this property does not exist.

回答已采纳

发布于 2013-09-17 05:11:00

我不相信有一个用于导航栏的集合对象，在这种情况下，这可能是您唯一的希望。

我建议您使用多选列表框创建自己的表单，在表单加载时使用查询对象填充它，然后编写代码循环访问列表框并导出选定的项。

票数 4

页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持

原文链接：

https://stackoverflow.com/questions/18829767

复制

相似问题

问在VBA中，如何在Microsoft Access 2007的导航窗格中获取选定对象的列表？EN