查找匹配问题

Bluelost

下面是我写的在一个范围里查找输入内容的代码,输入x就会找到第一个含x的单元格

        With Worksheets(2).Range("b2:b300")

          Set j = .Find(k, LookIn:=xlValues)

         If Not j Is Nothing Then

         addr = j.Address

         nrow = j.Row

         .Cells(nrow - 1, 2).Copy

         Worksheets(3).Cells(Target.Row, Target.Column - 9).PasteSpecial

但我想要输入单元格内容和目标单元格内容完全一致才算查找成功应该怎么做?

比如输入blue,目标单元的内容也是blue才行,blues多了个s就不行.

红池坝

你的意思是完全匹配吗？dim i as integer

dim found as booleanfound=false

For i=2 to 300

  if cells(i,2)=X then

    cells(i,2).select

    found=true

    exit sub

  endif

next i  if not found then

    msgbox "没有找到"

  endif

Bluelost

谢谢，我试试先