Bài viết: Viết code để nhìn thấy ai là người cập nhật bảng tính của bạn lần gần đây nhất

Liên hệ QC

kyo

Nguyễn Khắc Duy
Thành viên danh dự
Tham gia
4/6/06
Bài viết
901
Được thích
2,715
Viết code để nhìn thấy ai là người cập nhật bảng tính của bạn lần gần đây nhất

Nếu file Excel của bạn là 1 file dùng chung với nhiều người khác, và bạn cần biết ai là người cập nhật file này lần cuối cùng, dĩ nhiên là bạn biết Excel cho phép bạn xem điều này, nhưng bạn muốn tìm một cách dễ dàng thấy hơn, dễ dàng đập vào mắt bạn hơn, bạn có thể sử dụng thủ thuật sau.

Thủ thuật đó chính là "xâm nhập" vào Excel Title Bar. Như bạn thấy, thanh tiêu đề Excel của bạn chỉ đề duy nhất tên của Workbook hiện tại của bạn mà thôi, nhưng với chút VBA, bạn sẽ thêm vào một số thông tin mà bạn cần.

c7RFMwVVEHVwrS8ykvCFLjBBeGbihWFfmWwlwmJP_U4JujBu34yBlwqZJ4HVRq7I7CNN9O7q6Yge1YNHZSkGcIUjBr7k5puifVyvJtR0Jor0FNQVuhk7fur3cPYFs3C1Gwsatbex0h--_68Vut6gNNZzpcRKwNBlQtr_EgteWqXUxG4dMzTRQs-4nKw22VrUAFfimznE6DnKs7Ynxk5zjWPSLKypQGvevGxfIFYS2fKFg_JIdpWfOqb4u6UR5dzz0dMwUvaLHrGwsKhT4TT_5sRCNNCnAnfLR9rIKhkKcGuQckOwOwwsT71rAeHRf4QnWxI2MTV1zqlbaz3Ll7yxKhESndzPxpeHIHk5kpMqqH6BBRUjwceThUwQP5Lhb2qMrOEoDIVXqm7RX5UONOlNYt04L14cyi2KJ7AFOVuwo5-YgLZ3KGe9OXC5dylDemF4S2Sq8JFUi-stseC5ezcsO2xyF2LpqdxHDF9l3psPDJ5YKztmL6Qf1209UQj8s71ZnPLNOUet9xZlB-E1jMQX0Erdgns39ZwhZEa0EVpoSG_nfeNol8hOvKK4qK_0mJKDuc_YYjGPhW46-pzEglhhGBYtcc7rhODhCpyrgfTYKECkmJ5OjHvl=w528-h124-no

Nếu bạn muốn biết người dùng cuối cùng, hãy sử dụng code: ThisWorkbook.BuiltinDocumentProperties("Last Author")

Nếu bạn muốn biết thời gian lưu lần cuối cùng, hãy sử dụng code: ThisWorkbook.BuiltinDocumentProperties("Last Save Time")

Vậy để có thể tự động hiện trước mắt bạn, bạn chỉ cần chèn đoạn code này vào sự kiện Open của Workbook, thế là xong.

Mã:
Private Sub Workbook_Open()
 
ThisWorkbook.Windows(1).Caption = ThisWorkbook.Windows(1).Caption & "   Last Updated By: " & _
ThisWorkbook.BuiltinDocumentProperties("Last Author") & " on " & _
ThisWorkbook.BuiltinDocumentProperties("Last Save Time")
 
End Sub

Bạn hãy thử xem.

Một số bài viết có liên quan:
1/ Chiêu thứ 16: Cứu dữ liệu từ một bảng tính bị lỗi
2/ Tạm dừng VBA bằng cách sử dụng Wait, Sleep hoặc Vòng lặp
3/ UDF hữu ích: Một số hàm thông dụng cần thiết
 
Lần chỉnh sửa cuối:
Upvote 0
Bài viết của bạn nói về mỗi câu Code và tác dụng của nó. Vậy viết vào đâu, mở VBA ra như thế nào để viết vào thì bạn ko nói làm sao tôi làm nổi.
 
Bài viết của bạn nói về mỗi câu Code và tác dụng của nó. Vậy viết vào đâu, mở VBA ra như thế nào để viết vào thì bạn ko nói làm sao tôi làm nổi.
nếu bạn muốn học code thì bạn phải tìm hiểu môi trường code ở đâu chứ, đâu phải lúc nào cũng chỉ rõ môi trường viết code ở đâu cho từng mục sao
 
Bài viết của bạn nói về mỗi câu Code và tác dụng của nó. Vậy viết vào đâu, mở VBA ra như thế nào để viết vào thì bạn ko nói làm sao tôi làm nổi.

Bạn không biết viết vào đâu thì bạn không biết đi tìm hiểu hả?
Đây là chủ đề hay của các MOD của GPE
Bạn không biết cái này cái kia thì nên tìm hiểu trước khi phát biểu...Chẳng nhẻ viết cái gì...là phải rõ ràng, tận răng cho bạn hiểu ah.
Linh tinh hết sức...
 
Bài viết của bạn nói về mỗi câu Code và tác dụng của nó. Vậy viết vào đâu, mở VBA ra như thế nào để viết vào thì bạn ko nói làm sao tôi làm nổi.
Chào bạn,
Bài viết dành cho người đã biết VBA, một thủ thuật để làm việc nhanh hơn hiệu quả hơn trong môi trường này.

Chúng tôi sẽ cân nhắc việc đánh dấu phân loại bài viết cho những bài tới.

Cảm ơn bạn.

OverAC
 
Lần chỉnh sửa cuối:
người ta ko biết thì chỉ dẫn họ, chứ đừng nói kiểu đó mấy bạn
 
bạn mở 1 file excel, chuột phải vào tên sheet -> view code> nhấp đôi chuột vào ThisWorkbook -> rồi copy đoạn mã trên vào -> save, đóng file rồi mở lại, sẽ thấy kết quả
 
Cái này thú vị quá. Em đã làm được. Cám ơn chủ topic đã chia sẻ mẹo khá thú vị.
Kèm với 1 vote cho vuongtao vì cmt rất thực tế. Đọc cmt cảm nhận một bầu không khí nhẹ nhàng, không khinh khi ai cả.
 
tôi đọc cũng chẳng biết mấy anh hướng dẫn kiểu gì nữa, ít nhất cũng phải chỉ cách đưa code vào mục nào,thao tác ra sao. Có người thắc mắc thì các anh làm như không cần. Còn nói này nói kia, cứ làm như mình giỏi lắm ấy
 
tôi đọc cũng chẳng biết mấy anh hướng dẫn kiểu gì nữa, ít nhất cũng phải chỉ cách đưa code vào mục nào,thao tác ra sao. Có người thắc mắc thì các anh làm như không cần. Còn nói này nói kia, cứ làm như mình giỏi lắm ấy
Cái gì cũng phải có kiến thức căn bản đã bạn..không ai lót ổ cho bạn đẻ đâu.suy nghĩ và tìm hiểu trước khi phát biểu nhé bạn.
 
Cảm ơn mấy bác, mấy bác có cách nào để xem được lịch sử của những lần cập nhật trên file excel chung với những ng khác cùng sử dụng file không ? (ví dụ lúc 10AM: anh A cập nhật chỗ nào, lúc 11AM: anh B cập nhật chỗ nào, giống như history trong Chrome đó)
 
Bài viết của bạn nói về mỗi câu Code và tác dụng của nó. Vậy viết vào đâu, mở VBA ra như thế nào để viết vào thì bạn ko nói làm sao tôi làm nổi.
Trước khi phát biểu điều gì thì phải suy nghĩ trước khi làm nói, mà đã biết code thì phải biết môi trường làm việc nó nằm ở đâu, còn k biết thì nên đi tìm hiểu những cái đơn giản nhất trước khi bắt đầu viết code nhé.
 
code này khá hay, nhưng nếu ghi luôn vào lược sử mở files trong details của properties thì hay hơn nữa.
 
Chào các bạn, mình đã làm thử như trên thì đúng là sau khi chạy nhưng sau khi mình save tắt đi nó lại mất. Help me
 
Chào các bạn, mình đã làm thử như trên thì đúng là sau khi chạy nhưng sau khi mình save tắt đi nó lại mất. Help me

Bạn đang lưu file dưới dạng nào vậy? Nếu bạn lưu xlsx thì code sẽ mất bạn nhé, bạn cần lưu file ở dạng xlsm
 
Web KT
Back
Top Bottom