主题：两个表同时导出的问题

老师，最后一个问题：想把两个表A和B同时用Excel文件的格式导出，要求先后出现“另存为”对话框并手动修改保存的文件名、选择保存的路径，该如何修改下面这段代码？（我想少按几下鼠标）

Dim ex as New Exporter
ex.SourceTableName = "A"
ex.SourceTableName = "B"
ex.Format = "Excel"
ex.Fields = "日期,客户,数量,单价"
ex.Export()