Buscar valor exato

Question

Estou fazendo um banco de dados, e minha busca é um numero (ex. "1021").

Quando realizo a busca: Set c = .Find(Me.txtentrada.Value) do numero "1021" e por eventualidade digito "10", o código me retorna o primeiro "10" que encontra na coluna do banco de dados, podendo ser  "1010 ou 1001" qualquer que encontre primeiro contendo 10 no corpo do numero. Teria algum código ou função para só buscar o valor exato?

Answer 1

https://youtu.be/UO0VxuWhxXU

---

A melhor forma de agradecer e votar como util e / ou marcar como resposta. Anderson Diniz [e-mail]

Answer 2

Sub Macro1()
'
' Macro1 Macro
'

'
    Cells.Find(What:="10", After:=ActiveCell, LookIn:=xlFormulas, LookAt:= _
        xlWhole, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:=False _
        , SearchFormat:=False).Activate
End Sub
Sub Macro2()
'
' Macro2 Macro
'

'
    Range("G13").Select
    Cells.Find(What:="10", After:=ActiveCell, LookIn:=xlFormulas, LookAt:= _
        xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:=False _
        , SearchFormat:=False).Activate
End Sub

---

A melhor forma de agradecer e votar como util e / ou marcar como resposta. Anderson Diniz [e-mail]

Answer 3

https://youtu.be/5Gjr5-V6YN4

---

A melhor forma de agradecer e votar como util e / ou marcar como resposta. Anderson Diniz [e-mail]

Answer 4

https://www.youtube.com/results?search_query=EXCEL+VBA+FIND

---

A melhor forma de agradecer e votar como util e / ou marcar como resposta. Anderson Diniz [e-mail]

Answer 5

https://youtu.be/2cFXUQ1OCDM

---

A melhor forma de agradecer e votar como util e / ou marcar como resposta. Anderson Diniz [e-mail]

Answer 6

Set c = .Find(Me.txtentrada.Value, , , xlWhole)

xlWhole: coincide somente palavras inteiras

xlPart: coincide partes de palavras.