各位网友好,现求EXCEL VBA代码 现要在一范围内查询某一字符串,看在这个...
发布网友
发布时间:2024-03-05 23:04
我来回答
共2个回答
热心网友
时间:2024-08-26 19:14
Public Sub sss()
Dim iRng As Range, c As Range, iString As String
Set iRng = Range("a1:f100") '查询的范围
iString = "ABCD" '查询的字符串
'下面的语句进行查询
Set c = iRng.Find( _
iString, _
after:=iRng.Cells(iRng.Rows.Count, iRng.Columns.Count), _
LookIn:=xlValues, _
lookat:=xlPart)
'里面有4个参数,其中:
'LookIn:=xlValues ,表示查找的是单元格的值
'lookat:=xlPart ,表示查找的是单元格的部分内容,如果是整个单元格匹配,用 xlwhole
If c Is Nothing Then
'如果没有找到,……
Else
'如果找到了,……
End If
End Sub
热心网友
时间:2024-08-26 19:13
自已写吧,参考帮助,如无vb基础,还是别折腾了