Jerry đã tạo một macro để kiểm soát phiên bản hỏi người dùng xem cô ấy có muốn lưu tài liệu với số phiên bản mới hay không. Nó tự động chạy khi một tài liệu được mở. Tuy nhiên, Jerry muốn để macro chỉ chạy khi tài liệu thực sự bị người dùng thay đổi hoặc thay đổi theo bất kỳ cách nào. Anh ấy tự hỏi liệu có một sự kiện đăng ký khi một tài liệu thực sự được chỉnh sửa? Hoặc là có, có lẽ, một thuộc tính đăng ký xem một tài liệu đã được thay đổi?

Không có sự kiện, nhưng có một tài sản. Những gì bạn muốn làm là kiểm tra thuộc tính Đã lưu của bất kỳ tài liệu nào bạn đang xử lý. Nếu thuộc tính là True, thì không có thay đổi nào. Nếu thuộc tính là Sai, thì có các thay đổi chưa được lưu. (Nói cách khác, trạng thái True of False của thuộc tính Đã lưu cho biết liệu tài liệu đã được lưu hay chưa.)

Nếu bạn muốn thực hiện lời nhắc về số phiên bản khi người dùng đang đóng tài liệu, thì bạn sẽ muốn làm việc với trình xử lý sự kiện Document_Close. Sửa đổi trình xử lý sự kiện để bạn kiểm tra trạng thái của thuộc tính Đã lưu, theo cách này:

Private Sub Document_Close()

If Not ActiveDocument.Saved Then         ' Check to see if version should be updated         ActiveDocument.Save     End If End Sub

Tất nhiên, bạn sẽ cần thay thế nhận xét bằng mã cụ thể của mình để xử lý những gì sẽ xảy ra liên quan đến số phiên bản. Phương thức Lưu được sử dụng để lưu tài liệu dưới tên hiện tại; nếu bạn muốn lưu nó dưới một tên mới, thay vào đó bạn sẽ sử dụng phương thức SaveAs.

Có một lưu ý cần nhớ: Thuộc tính Đã lưu có thể được đặt thành Sai mặc dù người dùng không thực sự thực hiện thay đổi trong tài liệu. Ví dụ: nếu có các trường trong tài liệu và các trường được cập nhật tự động, thì thuộc tính Đã lưu được đặt thành Sai. Cũng có một số trường hợp khác trong đó thuộc tính bị thay đổi, nhưng thuộc tính Đã lưu là cách chính xác nhất hiện có để xác định liệu một tài liệu có thực sự được thay đổi hay không.

_Lưu ý: _

Nếu bạn muốn biết cách sử dụng các macro được mô tả trên trang này (hoặc trên bất kỳ trang nào khác trên các trang WordTips), tôi đã chuẩn bị một trang đặc biệt bao gồm thông tin hữu ích.

WordTips là nguồn của bạn để đào tạo Microsoft Word hiệu quả về chi phí.

(Microsoft Word là phần mềm xử lý văn bản phổ biến nhất trên thế giới.) Mẹo này (13368) áp dụng cho Microsoft Word 2007, 2010, 2013, 2016, 2019 và Word trong Office 365.