Mình có 1 đoạn code như sau:
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("D5
10")) Is Nothing Then
'Can hien len hop thong bao du lieu cua cell vua thay doi
MsgBox "Nhap du lieu: " & ActiveCell
End If
End Sub
Mình muốn là nhập hoặc thay đổi giá trị vào 1 trong các ô từ D5 đến D10 thì sẽ hiện thông báo giá trị vừa nhập vào ô đó.
Mình không biết làm cách nào để lấy lại giá trị hoặc địa chỉ của ô mà mình đã thay đổi nội dung. Nhờ mọi người giúp đỡ với. Thanks
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("D5

'Can hien len hop thong bao du lieu cua cell vua thay doi
MsgBox "Nhap du lieu: " & ActiveCell
End If
End Sub
Mình muốn là nhập hoặc thay đổi giá trị vào 1 trong các ô từ D5 đến D10 thì sẽ hiện thông báo giá trị vừa nhập vào ô đó.
Mình không biết làm cách nào để lấy lại giá trị hoặc địa chỉ của ô mà mình đã thay đổi nội dung. Nhờ mọi người giúp đỡ với. Thanks