Michael có một cái bàn khá dài. Một cột của bảng chứa các ký tự mã hóa như các chữ cái c, b, x, v.v. Anh ấy tự hỏi liệu có cách nào khi in bảng để chỉ in những hàng có một ký tự mã hóa cụ thể trong cột. Ví dụ: anh ta có thể chỉ muốn in những hàng có chứa mã “c” trong cột mã hóa.

Có một số cách tiếp cận bạn có thể sử dụng để giải quyết vấn đề này.

Có lẽ phương pháp dễ nhất sẽ là sao chép bảng vào trang tính Excel và sau đó lọc dữ liệu dựa trên các ký tự trong cột mã hóa. Sau đó, bạn có thể in trang tính đã lọc và có những gì bạn muốn.

Tất nhiên, có thể đôi khi làm việc trong Excel thay vì Word là không thực tế hoặc mong muốn. Ví dụ: bạn có thể không có Excel hoặc bạn có thể có nhu cầu định dạng vượt quá những gì Excel có thể cung cấp. Trong trường hợp đó, bạn có thể chỉ cần sắp xếp bảng của mình trong Word dựa trên nội dung của cột mã hóa. Sau đó, chọn những hàng trong bảng có chứa mã bạn muốn in (tất cả chúng phải liền nhau vì bạn đã sắp xếp bảng) và chọn in. Tuy nhiên, khi chỉ định những gì sẽ in, chỉ in lựa chọn.

Một cách tiếp cận khả thi khác là sử dụng bảng của bạn làm nguồn dữ liệu cho phối thư. Tôi sẽ không đi sâu vào các bước chính xác để sử dụng khi thiết kế phối thư (chúng đã được đề cập trong WordTips khác), nhưng bạn có thể chỉ định rằng hợp nhất chỉ bao gồm những thứ có ký tự mong muốn trong cột mã hóa.

Cuối cùng, nếu bạn cần thực hiện việc in chọn lọc này khá thường xuyên, bạn có thể muốn tạo một macro để xử lý tác vụ. Cách dễ nhất để thực hiện việc này là macro tạo một tài liệu mới và sao chép các hàng mong muốn vào tài liệu đó.

Sub CopyTableRows()

Dim SourceDoc As Document     Dim r As Row     Dim iCol As Integer     Dim sPCode As String     Dim sTemp As String

iCol = 3        ' Set the coding column     sPCode = "C"    ' Set code to select (must be uppercase)



ScreenRefresh = False

Set SourceDoc = ActiveDocument      ' Get active document's name     Documents.Add       ' Create a new document

' Find all rows that have correct code in the coding column     For Each r In SourceDoc.Tables(1).Rows         sTemp = UCase(r.Cells(iCol).Range)

sTemp = Left(sTemp, Len(sTemp) - 2)     ' Remove cell overhead                  If sTemp = sPCode Then             r.Range.Copy             Selection.PasteAndFormat wdFormatOriginalFormatting         End If     Next r

ScreenRefresh = True End Sub

Để sử dụng macro, bạn cần đảm bảo rằng iCol được đặt thành cột được sử dụng làm cột mã hóa của bạn và sPCode đó chứa mã bạn muốn chọn. (Đây phải là tất cả chữ hoa.) Khi macro hoàn tất, bạn sẽ có một tài liệu chỉ chứa các hàng bạn muốn in và sau đó bạn có thể in tài liệu đó.

_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 (3511) áp dụng cho Microsoft Word 2007, 2010, 2013 và 2016.