比如代码
Tables("表A").Filter = "vip编号 like '%" & 13 & "%'"
如果不会写,贴出你写的代码 http://www.foxtable.com/webhelp/scr/1058.htm