主题：导出表时筛选

想从选中行开始导出，如下代码，可总是出错     _identify换成_sortkey也不行，应该怎么做？

 

Dim ex As New Exporter
ex.SourceTableName = "表一"
ex.FilePath =ProjectPath & "aaa.mdb"
ex.Filter = "_Identify >= " & CurrentTable.Current("_Identify")
If FileSys.FileExists(ex.FilePath) Then '如果目标文件已经存在
    FileSys.DeleteFile(ex.FilePath) '则删除之
End If
ex.Export()

 

 

 

假如我想再加一个标记列，如果导出了，标记列就选中，下次就直接导出未标记的，怎么做？

 

谢谢各位大师

不行啊，ex.Filter = "_Identify >= " & CurrentTable.Current("_Identify")这条本来就错误，加上后面的And ***也不对