主题：请教代码

窗口有2个table，2个表中都有[客户代码]，做了一个按钮，代码如下，希望产品信息表按照客户信息表的current行的客户代码进行过滤，但做出来后总是提示错误：没找到列[客户代码] ，您可以看附件截图一目了然，不知是什么原因？而实际上这2个表中都与客户代码[Qy2013010105]，截图中也可看到。

 

Dim Filter As String
Filter =  "[客户代码] = " &  Tables("客户信息").Current("客户代码")
If Filter >""
    Tables("产品信息").Filter = Filter
End If

 

此主题相关图片如下：捕获.jpg

例子发出来看看.大概知道是什么原因.没有例子没办法确定.

你的filter有错误

 

 

filter =  “[客户代码] = ' "& table("客户信息").Current("客户代码") & '”

 

Filter =  "[客户代码] = '" &  Tables("客户信息").Current("客户代码") & "'"   看看吧

修改了filter还是没解决，只好请大师看看了。

 

 

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:test.rar

 

你发的例子不是正常运作了吗?

抱歉啊，我将窗口的table设置成副本了，结果没看到filter的结果。

为这个纠结了1天了，我的真正用处是将它用在tabcontrol的selectedindexchanged中。

 

再次感谢论坛的支持！