toandiennuoc123
Thành viên thường trực




- Tham gia
- 7/3/12
- Bài viết
- 239
- Được thích
- 9
Làm mẫu cho bạn 1 cái, bạn nghiên cứu thêm nhaNhờ các bạn làm giúp tôi file này. Xin cám ơn các bạn
Private Sub TextBox2_Exit(ByVal Cancel As MSForms.ReturnBoolean)
If Me.TextBox1.Value <> "" Then
If Me.TextBox2.Value <> "" Then
Sheets("TOAN").[b9] = Me.TextBox1.Value
Sheets("TOAN").[c9] = Me.TextBox2.Value
Else
MsgBox "Chua co du lieu"
End If
Else
MsgBox "Chua co du lieu"
End If
End Sub