主题：[求助]关于窗体中的副本表导出为Excel

在一个窗口中有一个表，选成了副本模式。

想将筛选的结果导出成为一张Excel表格，并人工指定存放位置。

导出按钮的代码为：

'''
Dim tbl As Table = Tables("考勤_Table1")
    tbl.Select(0,0)
    Syscmd.Project.ExportToExcel()

-------------

但导出的并不是筛选后的结果，而是原表的内容。

用SaveExcel又得指定存放位置。

CurrentTable.SaveExcel("C:\data\test.xls","订单")

有没有办法在副本的状态下点击按钮弹出对话框，让用户自行选择存放位置，文件名可以系统强制生成，也可以用户指定。

请给段小代码参考一下可否？