vba - MSACCESS - 如何通过 VBA (CommandBarButton) 触发 Excel 的导入/导出向导

Question

我有一个带有按钮的表单，该按钮必须通过 VBA 触发经典 Excel 的导入/导出向导。

我试图列出所有CommandBar以识别我需要的，然后是 Excel 的CommandBarButton，所以我可以将它用于功能。我确实喜欢这样：

Public Function ListCommBars()
Dim cbrBar As CommandBar
'Dim ctlBar As CommandBarButton
'Dim cbrBars As CommandBars
'Dim strVal As String

For Each cbrBar In CommandBars

    Debug.Print cbrBar.Name, cbrBar.NameLocal, cbrBar.visible
Next

End Function

但是此函数返回我在当前命令栏上无法识别的栏列表。我的目标是调用 Excel 的导入/导出CommandBarButton并通过 VBA 触发它。

我怎样才能做到这一点？

标签： vbams-accesscommandbar

Answer 1

也许你想要：

DoCmd.RunCommand acCmdExportExcel

或者

DoCmd.RunCommand acCmdImportAttachExcel

调用 CommandBars 是不推荐使用的方法。我唯一一次使用它是为了：
CommandBars.ExecuteMso "DataRefreshAll"