Vấn đề về code VBA hiển thị ngày tháng tự động khi nhập dữ liệu

Liên hệ QC

thaibao3

Thành viên mới
Tham gia
18/5/11
Bài viết
26
Được thích
1
Giới tính
Nam
Chào các bạn
Mình sử dụng code VBA trên diễn đàn để hiển thị ngày tự động khi nhập dữ liệu trong Excel. Nhập và hiển thị tốt, xóa dữ liệu thì ngày biến mất, rất ok
Tuy nhiên, nếu hôm nay nhập dữ liệu mà hôm sau lỡ click vào ô dữ liệu đã nhập thì nó lại hiển thị ngày mới click vào.
Mình muốn khi có dữ liệu rồi thì click nó ko đổi ngày thì làm như thế nào?

Mã:
Private Sub Worksheet_Change(ByVal Target As Range)
'Cot 1
If Not Application.Intersect(Range("E6:E60"), Target) Is Nothing Then
    If Range("E" & Target.Row).Value = "" Then
        Range("R" & Target.Row).ClearContents
    Else
        Range("R" & Target.Row).Value = Now
    End If
End If
End Sub
cảm ơn!
 
Lần chỉnh sửa cuối:
Web KT
Back
Top Bottom