Excel,VBA中,如何判断变量是不是包含特定字符串

Posted

tags:

篇首语:本文由小常识网(cha138.com)小编为大家整理,主要介绍了Excel,VBA中,如何判断变量是不是包含特定字符串相关的知识,希望对你有一定的参考价值。

excel单元格中可以用调用find,search的Application.WorksheetFunction公式。但vba的变量用什么方法?
现在是假定变量a="我想测试是否包含aa字符串",这个变量a中是否含有aa,如何测试??

VBA 中可以使用 这两个函数 函数啊……
也可以直接使用 另外一种 Like 函数……
如:
If A Like "*aa*" Then
MsgBox "A中有aa 这个字符串"
Else
MsgBox "A中没有aa 这个字符串"
End If
或者 使用 InStr 这个函数计算 也可以……
参考技术A if instr(1,a,"aa") >0 then
msgbox("a 包含 'aa'")

else
msgbox("a 不包含 'aa'")
end if本回答被提问者采纳

EXCEL VBA判断单元格是不是包含某字符

1.首先,看一下原始数据。

A列是公司名称,我们要在B列判断A列的文本是不是包含“北京”这两个字。

2.双击B2,输入公式:

=FIND("北京",A2)

B2单元格返回1,表示“北京”两个字在A2的文本出现的位置是从第一个字符开始。

3.下拉B2的公式,返回结果如下图所示。

其中返回的错误值是表示单元格文本中不包含“北京”。

4.单元格返回错误值不太好看,我们想办法将它屏蔽。

首先,用ISNUMBER函数判断返回结果是不是数字,如果不是数字就返回FALSE。把B2公式修改成:

=ISNUMBER(FIND("北京",A2))

5.然后用IF函数将TRUE转换成“Y”,FALSE转换成空显示。修改公式为:

=IF(ISNUMBER(FIND("北京",A2)),"Y","")

6.类似,可以用SEARCH()函数来实现FIND()函数实现的功能。

知识点补充:

SEARCH()函数和FIND()函数差异在通配符的使用和大小写的区分,有兴趣的读者可以自己在单元格中测试一下两个函数的差异。

7.在其他函数中,比如说VLOOKUP()和COUNTIF()等函数中使用通配符,也可以达到“包含”的目的。如下图,用COUNTIF()函数来识别是否包含“北京”文本,如果返回1就是包含,返回0就是不包含。

参考技术A

VBA判断单元格是否包含某字符使用InStr函数,与工作表的FIND函数类似。

InStr函数的帮助信息如下:



程序中判断是否包含,可以这样写VBA代码:

If InStr("111a222", "a")=0 Then MsgBox "不包含" Else MsgBox "包含"

执行示例:

参考技术B

    创建一张空白的表格。

    在“a1”单元格输入“你好朋友”。

    接着我们选择“B1”单元格。

    输入查找函数“=FIND("朋友",a1)”,查找a1中“朋友”这个字符所在位置。

    回车后我们发现“B1”的值是“3”,“朋友”这个在a1中的第三个字符位置,证明a1包含朋友这个字符。

    把函数改为“=FIND("哈哈",a1)”,查找“哈哈”在a1中的位置。

    回车后我们发现值是“#VALUE!”所以不存在“哈哈”这个字符。

    单元格是表格中行与列的交叉部分,它是组成表格的最小单位,可拆分或者合并。

    单个数据的输入和修改都是在单元格中进行的,单元格属于Microsoft Excel /WPS表格中使用的术语。

    单元格按所在的行列位置来命名,它有A1引用样式、R1C1引用样式和三维引用样式三种引用样式。

    单元格按所在的行列位置来命名,例如:地址“B5”指的是“B”列与第5行交叉位置上的单元格。

    可以利用OFFICE软件的EXCEL来编辑或者是GOOGLE的我的文档来创建或编辑。

参考技术C If Range("A1").Find("abc") <> Nothing Then
MsgBox "找到了"
Else
MsgBox "没找到"
End If
参考技术D if instr(cells(1,1),"abc")>0 then
msgbox "A1单元格包含abc"
ELSE
msgbox "A1单元格不包含abc"
end if

以上是关于Excel,VBA中,如何判断变量是不是包含特定字符串的主要内容,如果未能解决你的问题,请参考以下文章

vba 判断一个单元格中是不是包含某个字符串 有则执行后面的语句

请问:在VBA怎样判断在Excel选定区域内是不是存在某字符串?

excel判断是不是包含一些文字

vba 判断一个单元格中是不是包含某个字符串 有则执行后面的语句

Excel中如何用VBA判断行数?

如何暂停特定的时间? (Excel/VBA)