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. Đơn giản chỉ cần mở cửa sổ nhắc lệnh, tìm thư mục mà bạn muốn có một danh sách, sau đó 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 FName As String     Dim Temp As String

With Dialogs(wdDialogFileOpen)

.Name = "."

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

Selection.TypeText "Files in " & PathWanted & ":" & vbCrLf

ChDir PathWanted             FName = Dir(".")

While FName <> ""

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

Wend                 Selection.TypeText Temp & vbCrLf                 FName = Dir             Wend         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 .DOCX), 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 (1466) áp dụng cho Microsoft Word 2007, 2010, 2013, 2016, 2019 và Word trong Office 365. Bạn có thể tìm thấy phiên bản của mẹo này cho giao diện menu cũ hơn của Word tại đây: