使用VBA循环组合框列表并为每个运行MS Access宏

Question

目前，我有一个带有组合框名称列表的MS Access 2003表单。使用此工具的方法：从下拉列表中选择一个名称，然后单击基于所选名称运行的MS Access宏（3个不同的查询），然后打开一个主Excel模板并运行一个将创建1的Excel宏每个销售人员的单个文件。

我要做的是：使用MS Access VBA代码循环组合框中的名称列表，然后运行现有的MS Access宏以单独运行名称列表中的每个查询，然后导出每个销售人员数据到excel模板已经格式化或只是Excel文件，我将格式化。

我不想手动选择每个名称，下拉总共超过300个名称，运行所有这些查询需要很长时间。我想使用VBA代码循环表单上的组合框中的每个名称，并使用每个名称来运行现有的ms访问宏（它一起运行3个查询）然后我想让该函数将每个单独的文件导出到Excel 。最终结果是每个销售人员都有自己的Excel文件。

Answer 1

Dim i As Long
  with myCombo
    For i = 0 To .ListCount
        Debug.Print .ItemData(i)
    Next i
end with