主题：能帮帮搜索代码吗？

感谢！感谢

如果只是搜索到第一列的ComboBox5里面的数据，不是把他筛选出来应该怎么改一下啊！

Tables("表A").Filter = "第一列 Like '%" & e.Form.Controls("ComboBox5").Text & "%'"

现在是搜索到 并且筛选出来了，有没办法 不筛选出来 只是只是选择ComboBox5相同的行！感谢 感谢 

就是鼠标移到搜索到的那行，点击一下的效果

不单独筛选，

参考帮助

可以了

No 是双精度小数  就要报警  能帮帮忙看看吗？

With CurrentTable

    Dim C As Integer

    C = .FindRow("[Convert(No], 'System.String') Like  '*" & e.Form.Controls("ComboBox1").Text & "*'") '从 第一行开始查找

    If C >= 0 Then '如果找到的话

        .Position = C '定位到找到的行.

    End If

End With