给你个列子 在 C列找 包含 “宁波” 的单拿如扰元格 ,如果 是完全匹配 XLPART 改成XLWHOLESub 查找()Set findcell = Columns("c").Find("宁波", LookAt:=xlPart)If Not findcell Is Nothing ThenMsgBox findcell.RowElseMsgBox "没找到符合消旦橡激条件的单元格"End IfEnd Sub