.MatchFound

[tuanh1979]

Private Sub NMSPMMH_AfterUpdate()
Sheet2.Range("mh").Select
Selection.Find(what:=NMSPMMH, MatchCase:=True).ActiveCell
If NMSPMMH.MatchFound = True Then
MsgBox "ma hang nay da co ban hay nhap hang khac"
Me.NMSPMMH.Value = ""
End If
End Sub

Mình chạy đoạn code này nhưng máy báo lỗi :" Method or data member not found (Error 461)". Lỗi ở đâu hả các bác.

 

[SoiBien]

cái NMSPMMH là cái control gi` vậy bạn?, lỗi trên chắc là do control đó không có thuộc tính MatchFound.