MS Access VBA : 添加 "Run Saved Imports" 到表单按钮

Question

我有以下代码：

Private Sub Command66_Click()
DoCmd.SetWarnings False
DoCmd.DeleteObject acTable, "Object"
DoCmd.DeleteObject acTable, "AccountingStandard"
DoCmd.SetWarnings True
End Sub

删除完成后，我想添加一些代码 Runs/Opens "Saved Imports"（来自“外部数据库”选项卡）。这可能吗？我需要添加什么类型的代码？

Answer 1

要打开对话框，请使用

DoCmd.RunCommand acCmdSavedImports

DoCmd.RunCommand acCmd... 中提供了所有菜单命令，但您需要在列表中找到正确的...

要运行特定导入，请使用

DoCmd.RunSavedImportExport "myImport"

MS Access VBA : 添加 "Run Saved Imports" 到表单按钮

MS Access VBA : Add "Run Saved Imports" to Form button

ms-access

vba

ms-access-2013