如何使用VBA刷新导航窗格

Geo*_*nos 3 ms-access vba

我有一个前端数据库,我动态地将一些链接表添加到后端数据库。接下来,我从隐藏的系统表中读取它们的 ID,以便将它们添加到我创建的一些自定义组中的导航窗格中。

虽然我相信我使用的是正确的表/值,但在完成 MSysNavPaneGroupToObjects 表中的插入后,我找不到任何方法来刷新导航窗格。

与我想要实现的目标接近的唯一信息可以在这里找到:通过 vba 访问更改导航窗格组

但就我而言,所有值都已成功创建(我认为),但我在导航窗格中看不到条目。有时它有效,但大多数时候我只看到空组。

我想知道是否有人解决了类似的问题,或者有一个文档/论坛我可以找到更多信息。谢谢

Par*_*ait 6

尝试以下方法

Application.RefreshDatabaseWindow
Run Code Online (Sandbox Code Playgroud)

或者:

CurrentDb.TableDefs.Refresh
Run Code Online (Sandbox Code Playgroud)