作者:乔山办公网日期:
返回目录:excel表格制作
给你个列子 在 C列找 包含 “宁zhidao波” 的单元格 ,如果 是完全版匹配 XLPART 改成XLWHOLE
Sub 查找()
Set findcell = Columns("c").Find("宁波", LookAt:=xlPart)
If Not findcell Is Nothing Then
MsgBox findcell.Row
Else
MsgBox "没找到符合条件的单元权格"
End If
End Sub
如要打开知f:盘中名为道vb的文件夹中名为vba.xls的版文件的权sheet2的工作表:
Sub Macro1()
Workbooks.Open ("f:\vb\vba.xls")
Worksheets("sheet2").Activate
End Sub
如图所示,如果D列单元格抄内包含A1:B8区域内的某一个单元格内容,则E列显示“包含”,否则显示“不包含”:
公式为=IF(COUNT(FIND(A$1:B$8,D1)),"包含","不包含")
公式释袭义:在D1中分别查找百A1:B8中的内容,找到返回一个位置数字,找不到则为错误,用conut函数计算度find计算结果中的数字个数,只要count结果大于0,则说明包含。