设置filter属性:
Tables("表A").Filter = "[_Idenitfy] Is Null"
如果是副本:
Tables("窗口1_Table1").Filter = "[_Idenitfy] Is Null"