Người dùng WordPerfect có thể quen thuộc với tính năng cho phép bạn in nội dung của một thư mục. Thật vậy, có thể rất tiện lợi khi có một bản in của tất cả các tài liệu trong một thư mục. Thật không may, Word không có lệnh nội tại cho phép bạn hoàn thành tác vụ tương tự. Tuy nhiên, có một số cách bạn có thể tiếp cận vấn đề này.

Đầu tiên là phương pháp DIR cũ đã được thử và đúng, đã được sử dụng bởi các “công nghệ” kể từ những ngày của DOS. Chỉ cần mở một dấu nhắc lệnh (MS-DOS)

cửa sổ, định vị thư mục mà bạn muốn có một danh sách, rồi gõ lệnh sau:

dir /b > mydir.txt

Điều này tạo ra một tệp văn bản (mydir.txt) chỉ chứa tên của các tệp trong thư mục. Sau đó, bạn có thể định vị tệp trong Word và tải tệp đó dưới dạng tài liệu. Mặc dù cách tiếp cận này không phải là một bước duy nhất, nhưng nó cũng không đặc biệt khó.

Nếu bạn muốn một giải pháp vĩ mô cho vấn đề, bạn có thể sử dụng cách sau. Nó hiển thị hộp thoại Mở tiêu chuẩn, trong đó bạn có thể duyệt tìm thư mục mà bạn muốn có danh sách. Khi bạn chọn một tệp trong thư mục đó và nhấp vào Mở, macro sẽ tạo một tài liệu Word mới liệt kê tất cả các tệp trong thư mục đó. Lưu ý rằng bạn phải chọn một tệp từ thư mục.

Sub ListFiles()

Dim PathWanted As String     Dim Temp As String     Dim i As Integer

With Dialogs(wdDialogFileOpen)

.Name = "."

If .Display = -1 Then             Documents.Add             PathWanted = Options.DefaultFilePath(wdDocumentsPath)

Selection.TypeText "Files in " & PathWanted & ":" & vbCrLf             With Application.FileSearch                 .LookIn = PathWanted                 .FileName = "."

If .Execute > 0 Then                     For i = 1 To .FoundFiles.Count                         Temp = .FoundFiles(i)

While InStr(Temp, "\") > 0                             Temp = Mid(Temp, InStr(Temp, "\") + 1)

Wend                         Selection.TypeText Temp & vbCrLf                     Next                 End If             End With         End If     End With End Sub

Nếu bạn muốn giới hạn các tệp được trả về bởi macro (ví dụ: chỉ với những tệp kết thúc bằng .DOC), thì bạn có thể thay đổi thông số kỹ thuật tệp (“.”) Trong hai trong số các dòng chương trình.

_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 (1148) á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: