Excel 怎么用Vba检查一个字符串中是否包含特定的字母

如题所述

Sub 宏1()
Dim SearchString, SearchChar, MyPos
SearchString = "XXpXXpXXPXXP" ' 被搜索的字符串
SearchChar = "P" ' 要查找字符串 "P"。
' 从第四个字符开始,以文本比较的方式找起。返回值为 6(小写 p)。
' 小写 p 和大写 P 在文本比较下是一样的。
If InStr(4, SearchString, SearchChar, 1) <> 0 Then
result = "有"
Else
result = "无"
End If
End Sub
温馨提示:答案为网友推荐,仅供参考
第1个回答  2016-09-24
试试这个代码
Sub test()
For i = 1 To 5
Cells(i, 2) = IIf(Cells(i, 1) Like "*Z*-*", "错", "对")
Next
End Sub

相关了解……

你可能感兴趣的内容

本站内容来自于网友发表,不代表本站立场,仅表示其个人看法,不对其真实性、正确性、有效性作任何的担保
相关事宜请发邮件给我们
© 非常风气网