Cách ghi ngày tháng và thời gian tự động khi dữ liệu thay đổi

Thật dễ dàng để chúng ta chèn ngày và thời gian tĩnh theo cách thủ công hoặc chèn một ngày tự động thay đổi với thời gian hệ thống bằng một công thức. Nhưng nếu bạn muốn ghi ngày và thời gian tự động khi bạn thay đổi  giá trị, bạn có thể làm như sau.

Ghi ngày tháng và thời gian tự động khi dữ liệu thay đổi với mã VBA

Giả sử, bạn có một dãy các giá trị, và bạn muốn thay đổi hoặc nhập vào giá trị mới trong cột B, thì ngày tháng và thời gian trong cột C cũng tự động thay đổi

Bạn có thể hoàn thành việc trên bằng các mã VBA. Vui lòng làm như sau:

1. Nhấn ALT+F11 để mở cửa sổ Microsoft Visual Basic for Applications.

2. Sau đó chọn trang tính bạn đang hoạt động phía bên trái Project Explorer, nhấp 2 cái để mở Module, sau đó sao chép đoạn mã VBA sau vào cửa sổ code của Worksheet bạn đang làm việc vì đây là sự kiện Worksheet_change

3. Lưu và đóng cửa sổ lại. Bây giờ khi bạn thay đổi giá trị trong cột B, ngày tháng và thời gian sẽ được tự động ghi lại trong cột C.

Chú ý:

1. Trong đoạn mã trên, bạn có thể xác định “B:B” là bất cứ cột nào bạn muốn thay đổi dữ liệu trong đoạn sau: Set WorkRng = Intersect(Application.ActiveSheet.Range(“B:B”), Target).

2. Với xOffsetColumn = 1, bạn có thể chèn và cập nhật ngày tháng và thời gian cho cột đầu tiên kế bên cột giá trị bạn thay đổi. Bạn có thể thay đổi con số này thành những số khác như 2,3,4,5… điều này nghĩa là ngày tháng và thời gian sẽ được chèn vào cột thứ 2, 3,4,5 bên cạnh cột có giá trị thay đổi.

3. Khi bạn xóa giá trị trong cột cần thay đổi, ngày tháng và thời gian cũng sẽ bị xóa theo.