Định kỳ, tôi duyệt qua các tệp trong thư mục Word của mình để xác định xem có thể xóa bất kỳ tài liệu cũ nào một cách an toàn hay không. Nhiều lần, tôi cần phải mở tệp để xem xét nó trước khi tôi có thể quyết định xem nó có nên bị xóa hay không.

Tất nhiên, Word sẽ cho phép bạn xóa tệp được liệt kê trong hộp thoại Mở hoặc Lưu, nhưng nó sẽ không xóa tài liệu đang hoạt động — tài liệu đang mở tại thời điểm hiện tại. Thay vì đóng tài liệu đang hoạt động và sau đó xóa nó bằng cách mở hộp thoại Mở hoặc Lưu, tôi sử dụng macro sau để xóa tệp đang mở.

Sub DeleteThisFile()

Dim MyFile As String

MyFile = ActiveDocument.Path & "\" & ActiveDocument.Name     If MsgBox(MyFile & " will be deleted permanently", _       vbYesNo, "Delete this File?") = vbYes Then         ActiveDocument.Close (wdDoNotSaveChanges)

Kill MyFile     End If End Sub

Macro nhắc bạn đảm bảo rằng bạn muốn xóa tệp, và (nếu bạn làm vậy) nó sẽ đóng tài liệu mà không lưu rồi xóa.

Bạn cần lưu ý rằng tệp không đi vào Thùng rác mà sẽ bị xóa ngay lập tức.

_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 (1346) áp dụng cho Microsoft Word 97, 2000, 2002 và 2003. Bạn có thể tìm thấy phiên bản của mẹo này cho giao diện ribbon của Word (Word 2007 và sau này) tại đây: