Chèn trường ngày tháng vào trang tính trong excel 2003 để hiển thị ngày sửa đổi lần cuối
Câu trả lời:
Xin chào,
ALT+F11 để mở trình soạn thảo VB. Nhấp đúp vào 'ThisWorkbook' và dán mã bên dưới vào bên phải. Thay đổi trang tính và ô thành nơi bạn muốn có dấu thời gian
Private Sub Workbook_ BeforeSave(ByVal SaveAsUI dưới dạng Boolean, Hủy dưới dạng Boolean)
Trang tính ("Trang tính 1"). Phạm vi ("A1") = Hiện tại ()
kết thúc phụ
Nếu muốn, bạn có thể thêm người đã lưu sổ làm việc
Private Sub Workbook_ BeforeSave(ByVal SaveAsUI dưới dạng Boolean, Hủy dưới dạng Boolean)
Trang tính("Sheet1").Range("A1") = Môi trường("Tên người dùng") & " " & Hiện tại()
kết thúc phụ
Nếu bài đăng này trả lời câu hỏi của bạn, vui lòng đánh dấu nó là Câu trả lời.
Mike H
Câu trả lời:
Cố gắng sử dụng câu trả lời của bạn. Tôi phải làm gì sau khi đã dán bản sao và nhập các ô mong muốn? Tôi cứ bị lỗi này:
Lỗi biên dịch:
Đã phát hiện tên mơ hồ: Workbook_ BeforeSave
Câu trả lời:
re: Đã phát hiện tên mơ hồ
Bạn có thể đang cố gắng sử dụng cả hai ví dụ mã mà Mike H đã đăng.
Sử dụng cái này hay cái kia không phải cả hai.
'---
>Jim hình nón
Portland, Oregon Hoa Kỳ
https://goo.gl/IUQUN2 (Dropbox) >(bổ trợ excel & sổ làm việc thương mại và miễn phí)
Comments
Post a Comment