Để họ tên tự động hiện lên textbox (Tb-tenNV) khi mình nhập mã NV vào textbox mã NV (Tb_maNV). Tôi đã viết như thế này không hiểu sai chổ nào mà VBA không chạy - nhờ thầy hướng dẫn giúp.
Private Sub Tb_maNV_Change()
Dim i As Integer, dongcuoi As Long
dongcuoi = Sheet1.Range("A" & Rows.Count).End(xlUp).Row
For i = 2 To dongcuoi
If Tb_maNV.Value = Sheet1.Range("A" & i).Value Then
Me.Tb_tenNV.Value = Sheet1.Range("B" & i).Value
End If
Next i
End Sub
Dữ liệu ở Sheet1 như sau:
| Cột A | Cột B | 
| Mã NV | Họ và tên | 
| 0120 | Trần văn ổi | 
| 0111 | Nguyễn văn Đại | 
| 0113 | Lê Văn Bảy | 
| 0561 | Huỳnh Tony | 
 
            
            Chào bạn bạn vui lòng gửi file lên nhé, mình căn cứ vào file sửa cho bạn nhé.
 
            
            Được rồi - cám ơn thầy.
 
            
            Chúc bạn học tốt cùng gitiho