Word không có khả năng in tách màu vốn có.

Thay vào đó, bạn thường phải sử dụng một chương trình xuất bản trên máy tính để bàn đầy đủ tính năng như InDesign để thực hiện tác vụ này. Nói như vậy, bạn có thể thực hiện một hình thức tách màu đơn giản bằng cách thay đổi màu văn bản bạn không muốn in thành màu trắng, sau đó in tài liệu. Đảo ngược quy trình sau đó sẽ in ra màu khác.

Ví dụ: macro VBA sau sẽ cho phép bạn in văn bản được phân tách bằng màu cho tài liệu có chứa cả văn bản màu đỏ và đen:

Sub PrintSeps()

ActiveDocument.Save     Selection.HomeKey Unit:=wdStory

Selection.Find.ClearFormatting     Selection.Find.Replacement.ClearFormatting

'Change Red to White     Selection.Find.Font.ColorIndex = wdRed     Selection.Find.Replacement.Font.ColorIndex = wdWhite     With Selection.Find         .Text = ""

.Replacement.Text = ""

.Forward = True         .Wrap = wdFindContinue         .Format = True         .MatchCase = False         .MatchWholeWord = False         .MatchWildcards = False         .MatchSoundsLike = False         .MatchAllWordForms = False     End With     Selection.Find.Execute Replace:=wdReplaceAll     ActiveDocument.PrintOut

'Change White back to Red     Selection.Find.Font.ColorIndex = wdWhite     Selection.Find.Replacement.Font.ColorIndex = wdRed     Selection.Find.Execute Replace:=wdReplaceAll

'Change Auto to White     Selection.Find.Font.ColorIndex = wdAuto     Selection.Find.Replacement.Font.ColorIndex = wdWhite     Selection.Find.Execute Replace:=wdReplaceAll

'Change Black to White     Selection.Find.Font.ColorIndex = wdBlack     Selection.Find.Replacement.Font.ColorIndex = wdWhite     Selection.Find.Execute Replace:=wdReplaceAll

'Change Red to Black     'This is done so that Red will print as Black     'On some printers, non-black colors always     'print as a shade of gray. You want them only     'as black     Selection.Find.Font.ColorIndex = wdRed     Selection.Find.Replacement.Font.ColorIndex = wdBlack     Selection.Find.Execute Replace:=wdReplaceAll

ActiveDocument.PrintOut

ActiveWindow.Close SaveChanges:=wdDoNotSaveChanges End Sub

Lưu ý một số điều về macro PrintSeps. Đầu tiên, nó lưu tài liệu của bạn. Điều này được thực hiện bởi vì khi macro chạy xong, nó sẽ ném tài liệu ra ngoài. Lưu cho phép bạn tải tài liệu từ đĩa sau đó. Một điều khác cần lưu ý là điều này chỉ hoạt động đối với các tài liệu chỉ chứa văn bản màu đỏ và đen. Nếu bạn có các màu khác, những màu đó sẽ in trên cả hai thẻ. Nếu bạn có văn bản màu trắng, nó sẽ in với thẻ đỏ. Nếu bạn có đồ họa, không có sự phân tách được thực hiện trên chúng. (Nếu bạn có đồ họa và muốn chúng tách rời, bạn chắc chắn nên sử dụng chương trình xuất bản trên máy tính để bàn.)

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