Coincidencia exacta en un texbox
Soy principiante, y he confeccionado un formulario que lee códigos de barras, el problema es que hay veces que cuando no lo encuentra me devuelve el más próximo, habría forma de que me si no es exactamente el código me diera un mensaje, el código que estoy usando es
Private Sub TextBox1_AfterUpdate()
Set h = Sheets("Hoja2")
Set b = h.Columns("b").Find(TextBox1)
Set c = h.Columns("b").Find(TextBox1)
Set d = h.Columns("b").Find(TextBox1)
If Not b Is Nothing Then
TextBox2 = h.Cells(b.Row, "C")
TextBox3 = h.Cells(c.Row, "d")
TextBox4 = h.Cells(d.Row, "E")
Else
MsgBox "DATO NO ENCONTRADO"
TextBox1.SetFocus
End If
End Sub
Respuesta de Carlos Arrocha
1
1 respuesta más de otro experto
Respuesta de Dante Amor
2