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就是不包含。
dim rng as range
dim findstr as string
findstr="某字符" '这个某字符你替换成你需要的字符即可
For Each rng In Sheet1.UsedRange'注意这里的检测sheet1里面的数据区域 如果是其它sheet需改
If rng LIKE "*" & findstr & "*" Then
msgbox "单元格" & rng.address & "包含" & findstr
End If
Next
end sub本回答被提问者和网友采纳
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判断一个单元格的内容是不是汉字?
判断A1单元格，输入：=IF(LENB(A1)<>LEN(A1),"单元格包含汉字","没有汉字")，或输入：=IF(LENB(A1)=2*LEN(A1),"全部是汉字","不全是汉字")
Excel 怎么用Vba检查一个字符串中是否包含特定的字母
4、点击右边倒三角，选择触发方式，如BeforeDoubleClick表示在双击鼠标左键时触发 5、点击候出现如下代码框架 6、输入以下语句：Sheet1.Cells(1, 3) = Sheet1.Cells(1, 1) + Sheet1.Cells(1, 2)意为将A1、B1单元格求和并放在C1单元格 7、点击保存，然后关闭VBA窗口 8、由于A1,B1没有数据，所以...
请问:在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]...
Excel 怎么用Vba检查一个字符串中是否包含特定的字母
Sub find() Debug.Print InStr(Cells(5, 1), Chr(10)) '在A5单元格查找换行符的位置 L = InStr("abc#def","#") 'L等于"#"字符串"abc#def"中位置End Sub
