VBA脚本使用包含不起作用

时间:2014-11-14 11:23:58

标签: vba excel-vba contains excel

尝试使用简单的VBA脚本查看字段,如果该字段中间包含99,则显示另一个字段。我可以得到一个正常的语句来工作,即field2 = "5D992"但不是使用通配符的包含语句(参见下面的脚本)。我想可能只是我的语法错了,任何人的想法都没有?

Sub OnFormat

    IF rpt.field3.Text.contains "*99*" THEN 
        rpt.field2.visible = false
    Else 
        rpt.field2.Visible = true
    End If

End Sub

感谢您的任何建议。

1 个答案:

答案 0 :(得分:1)

您应该使用InStr

If InStr(1, rpt.field3.Text, "99", vbTextCompare) Then 
   rpt.field2.visible = false 
Else 
    rpt.field2.visible = true 
End If  

请参阅MSDN InStr Function documentation for more information