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就是不包含。

温馨提示:内容为网友见解,仅供参考
第1个回答  2017-06-06

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

InStr函数的帮助信息如下:



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

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

执行示例:

第2个回答  2018-03-30

    创建一张空白的表格。

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

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

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

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

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

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

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

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

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

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

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

本回答被网友采纳
第3个回答  2014-05-06
If Range("A1").Find("abc") <> Nothing Then
MsgBox "找到了"
Else
MsgBox "没找到"
End If
第4个回答  2014-05-19
if instr(cells(1,1),"abc")>0 then
msgbox "A1单元格包含abc"
ELSE
msgbox "A1单元格不包含abc"
end if

EXCEL VBA判断单元格是否包含某字符
1.首先,看一下原始数据。A列是公司名称,我们要在B列判断A列的文本是不是包含“北京”这两个字。2.双击B2,输入公式:=FIND("北京",A2)B2单元格返回1,表示“北京”两个字在A2的文本出现的位置是从第一个字符开始。3.下拉B2的公式,返回结果如下图所示。其中返回的错误值是表示单元格文本中不...

EXCEL VBA怎么判断单元格是否包含某字符?
在“a1”单元格输入“你好朋友”。接着我们选择“B1”单元格。输入查找函数“=FIND("朋友",a1)”,查找a1中“朋友”这个字符所在位置。回车后我们发现“B1”的值是“3”,“朋友”这个在a1中的第三个字符位置,证明a1包含朋友这个字符。把函数改为“=FIND("哈哈",a1)”,查找“哈哈”在a1中的位...

EXCEL VBA判断单元格是否包含某字符
1.�0�2�0�2If cells(1,1) Like “*?*” Then2. �0�2If InStr(1, cells(1,1), “?”) = 0 Then用VBA判断EXCEL元素是否包含特定字符的情况较为常用,且多放在循环语句中,从运行效率来讲,第二种方法优于第一种,当然,如果...

excel中如何用VBA判断一个单元格的内容是不是汉字?
判断A1单元格,输入:=IF(LENB(A1)<>LEN(A1),"单元格包含汉字","没有汉字"),或输入:=IF(LENB(A1)=2*LEN(A1),"全部是汉字","不全是汉字")

Excel 怎么用Vba检查一个字符串中是否包含特定的字母
Sheet1.Cells(1, 3) = Sheet1.Cells(1, 1) + Sheet1.Cells(1, 2)意为将A1、B1单元格求和并放在C1单元格 7、点击保存,然后关闭VBA窗口 8、由于A1,B1没有数据,所以C1为0 9、输入数据后,会发现即使按了回车,C1也不变,因为设置的是双击鼠标左键触发。10、双击鼠标左键后就变了 ...

请问:在VBA怎样判断在Excel选定区域内是否存在某字符串?
如果你要查找的某字符串是固定的数值,这个应该不难办到,可以用Worksheet_SelectionChange事件,添加适当的代码来达到些目的。假如你的某两个单元格内有以下内容:我们的家乡 我们的中国 你在在你选定的区域内查找“家乡”这两个字 在sheet1代码编辑器中粘贴以下代码。Private Sub Worksheet_SelectionChange...

求EXCEL vb 代码,判定单元格中是否包含某字符串!
Sub fine()Dim A As String Dim B As String A = "金典嘉园"B = "玫瑰花园"For h = 1 To Cells(Rows.Count, 1).End(3).Row If InStr(1, Cells(h, 1), A) Then Cells(h, 2) = A Else If InStr(1, Cells(h, 1), B) Then Cells(h, 2) = B End If Next End Sub ...

EXCEL中用VBA判断单元格字符包含
Function reif(rng As Range, rng1 As Range) As String With CreateObject("vbscript.regexp") .Global = True .Pattern = "[" & rng(1) & "]" reif = .Replace(rng1(1), "") End With reif = IIf(reif = "", "真", "假")End Function ...

excel 判断一个字符在单元格里是否存在 用vba怎么写?
Sub qqq()For i = 1 To 4 If InStr(Cells(1, i), "12") Then x = x & 1 & "+"Next[e1] = Left(x, Len(x) - 1)End Sub

在excel中怎么判断一个单元格是否包含某个字符
在Excel中,可以使用“IF”和“SEARCH”函数来判断单元格中是否含有某个字符。1. 使用IF函数:IF函数用于在Excel中进行条件判断。其语法为:IF(logical_test, [value_if_true], [value_if_false])。其中logical_test是你要测试的条件,[value_if_true]是当条件为真时返回的值,[value_if_false]...

相似回答