Hãy tưởng tượng rằng bạn đang phát triển một tài liệu sử dụng màu văn bản để báo hiệu những ý nghĩa đặc biệt cho người đọc. Ví dụ: bạn có thể sử dụng văn bản màu đỏ để cho biết người dùng nên nhập gì. Nếu bạn đang phát triển một tài liệu mà bạn sử dụng màu trong văn bản của mình, thì việc sử dụng menu nhiều lần để thay đổi màu văn bản có thể là một điều phiền toái. Trong trường hợp như vậy, sẽ rất hữu ích nếu có một macro sửa đổi màu tự động. Bạn có thể gán macro cho tổ hợp phím hoặc nút trên thanh công cụ để không phải sử dụng các menu. Macro sau thay đổi màu của văn bản hiện được chọn thành màu đỏ.

Sub MakeRed()

If Selection.Type = wdSelectionNormal Or _       Selection.Type = wdSelectionBlock Then         Selection.Font.ColorIndex = wdRed     Else         Beep     End If End Sub

Nếu bạn muốn sử dụng một màu khác ngoài màu đỏ, hãy thay đổi phép gán màu được thực hiện trong macro. (Chỉ cần thay đổi hằng số wdRed thành màu mong muốn.) VBA cho phép bạn sử dụng hằng số để biểu thị màu sắc.

Có mười bảy số màu khác nhau có sẵn:

Number

Text Color

Word Constant

0

Auto

wdAuto

1

Black

wdBlack

2

Blue

wdBlue

3

Cyan

wdTurquoise

4

Green

wdBrightGreen

5

Magenta

wdPink

6

Red

wdRed

7

Yellow

wdYellow

8

White

wdWhite

9

Dark Blue

wdDarkBlue

10

Dark Cyan

wdTeal

11

Dark Green

wdGreen

12

Dark Magenta

wdViolet

13

Dark Red

wdDarkRed

14

Dark Yellow

wdDarkYellow

15

Dark Gray

wdGray50

16

Light Gray

wdGray25

_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 (253) áp dụng cho Microsoft Word 97, 2000, 2002 và 2003.