Ghi Lại Thời Gian Nhập Liệu Trong Excel

Nếu chúng ta và các đòng nghiệp cùng thao tác làm việc trên 1 file Excel thì câu hỏi nội dung hay được chỉnh sửa các lần trong các khoảng tầm thời gian khác biệt. Nhưng làm cho nuốm làm sao để cai quản, kiểm soátbiết tin về thời hạn tạo ra, chỉnh sửa tệp tin gần nhất? Cách dễ dàng làtạo code VBA tự động hóa ghi nhận thời gian dữ liệu được nhập vào tệp tin Excel, từ đó thời gian nhập liệu của toàn bộ nội dungphần lớn được khắc ghi và hiển thị tức thì vào Excel. Hãy cùng tiennghich.mobi tìm hiểu phương pháp làm trong bài viết này nhé!

Biến Excel thành công thế so sánh dữ liệu chuyên sâu.

Bạn đang xem: Ghi lại thời gian nhập liệu trong excel

Hướng dẫn biện pháp viết code tự động ghi nhấn thời gian nhập dữ liệu bằng VBA

Sử dụng hàm NOW trong Excel

Hàm NOW trong Excel tất cả tính năng xác định thời điểm này, hàm NOW đang trả hiệu quả bao hàm cả ngày/tháng/năm với giờ/phút/giây theo thời hạn thực. Cũng bởi vì nuốm màngẫu nhiên lúc nào Excel thực hiện tính toán thì công dụng hàm NOW sẽ tự động hóa biến đổi. Tuy nhiên, nhiệm vụ của chúng ta là ghi dìm thời khắc kết thúc nhập tài liệu vào Excel, những điều đó tác dụng đó không được đổi khác.

*

Để chu đáo thời gian xong xuôi nhập tài liệu bằng hàm NOW trong Excel các bạn làm theo quá trình sau:

Cách 1: Viết hàm NOW với cú pháp: =NOW()Bước 2: Sao chxay hiệu quả của hàmCách 3: Dán tác dụng của hàm để hàm ko auto update.

Xem thêm:

*

2. Sự kiện mang đến WorksheetLà các sự khiếu nại nối liền mang lại 1 sheet trong tệp tin Excel (Worksheet trong Workbook), các đối tượng người dùng trong sự khiếu nại Worksheet ít hơn trong Workbook, nó hay tương quan tới sự đổi khác vào tính toán thù, chọn lựa giỏi cập nhật dữ liệu trong sheet.

*

Tiếp tục cùng với ví dụ của bọn chúng ta: Nếu các bạn đổi khác tài liệu tại ô A3 thuộc Sheet1 thì bạn phải triển khai Call sự kiện Worksheet_Change tại Sheet1 với đính thêm câu lệnh hàm NOW vào nhỏng sau:

- Tại cửa sổ Project, nháy đúp chuột vào Worksheet yêu cầu tọa sự kiện (Sheet1)

- Chọn Worksheet, tiếp nối chọn sự kiện Change

- Từ đó Sub Worksheet_Change được sinh sản từ bỏ động

- Tiếp theo bạn nhập đoạn mã VBA sau:

*
Trong đó:

If Not Application.Intersect(Range(“A3”), Target) Is Nothing Then....End If

- Xét coi trên ô A3 bao gồm xảy ra biến hóa tài liệu không

ActiveSheet.Range(“B3”).Value = Now

- Gán hiệu quả hàm NOW vào ô B3Bây tiếng khi chúng ta nhập dữ liệu tại ô A3 trong Excel, hiệu quả vẫn tự động trả về ô B3.

Bước 3: Tối ưu phạm vi ảnh hưởng của câu lệnh

Vậy nên là các bạn đang thực hiện thành công xuất sắc việcghi nhận thời hạn nhập dữ liệu tự động bởi VBA trên 1 ô tính vào Excel. Bây giờ bọn họ hãy thử áp dụng câu lệnh với cùng một vùng rộng hơn trường đoản cú A2 mang lại A100 giỏi cả cột A nhé!

Đoạn mã VBA để kết quả hàm NOW được trả về cột B với tất cả các ô cột A khớp ứng được nhập dữ liệu nlỗi sau:

If Not Application.Intersect(Range(“A2:A100”), Target) Is Nothing Then If Range(“A” & Target.Row).Value = “” Then Range(“B” và Target.Row).ClearContents Else Range(“B” và Target.Row).Value = Now End IfEnd If

Trong đó:

Intersect(Range(“A2:A100”), Target): Xét sự khiếu nại ra mắt trong vùng A2:A100 (nếu còn muốn thay đổi vùng sự khiếu nại bạn chỉ cần biến đổi tại Range("vùng sự kiện"))If Range(“A” và Target.Row).Value = “” Then: Nếu quý giá trên cột A làm việc chiếc ảnh hưởng tác động rỗng thìRange(“B” và Target.Row).ClearContents: Xóa câu chữ tại chiếc tương ứng sinh sống cột BElse: Mặt khácRange(“B” & Target.Row).Value = Now: Gắn tác dụng hàm NOW trên mẫu tương ứng tác động vào cột BEnd if: Kết thúc hàm if xét quý hiếm rỗngEnd if: Kết thúc hàm if xét vùng sự kiện

Kết quả: