主题：模糊查找报错

和筛选无关，你修改这个表CurretChanged事件代码：

 

if  e.Table.Current IsNot Nothing Then
     '原来的CurrentCanged事件代码
End if

因为筛选后，如果没有符合条件的行，e.Table.Current 或者 Tables("表名").Current肯定要出错。
使用Current是必须判断的，切记。