Word bao gồm một số lệnh và phím tắt cho phép bạn tìm kiếm đồ họa trong tài liệu của mình. Thật không may, những phương pháp tìm kiếm đó chỉ tốt cho việc tìm kiếm đồ họa nội tuyến. Nếu bạn muốn tìm đồ họa nổi, bạn đã hết may mắn; vì chúng nằm trên lớp đồ họa chứ không phải trong tài liệu thực nên Word bỏ qua chúng khá nhiều.

Tuy nhiên, có một cách bạn có thể tìm thấy đồ họa nổi bằng cách sử dụng macro. Một macro có thể kiểm tra các đồ họa nổi trong tài liệu của bạn và lần lượt chọn từng đồ họa trong số chúng. Macro sau thực hiện điều đó:

Sub FindFigs()

Dim varItem As Variable     Dim bExists As Boolean     Dim iShapeCount As Integer     Dim iJumpTo As Integer

' ensure variable exists     bExists = False     For Each varItem In ActiveDocument.Variables         If varItem.Name = "FigNum" Then             bExists = True             Exit For         End If     Next varItem

' initialize document variable if doesn't exist     If Not bExists Then         ActiveDocument.Variables.Add _           Name:="FigNum", Value:=0     End If

' figure to jump to     iJumpTo = ActiveDocument.Variables("FigNum") + 1

' get number of shapes     iShapeCount = ActiveDocument.Shapes.Count     If iJumpTo > iShapeCount Then iJumpTo = 1

If iShapeCount > 0 Then         'Display the shape         ActiveDocument.Shapes(iJumpTo).Anchor.Select         'Select the shape         ActiveDocument.Shapes(iJumpTo).Select     End If     'Set the variable for next time     ActiveDocument.Variables("FigNum") = iJumpTo End Sub

Macro này sử dụng một biến tài liệu để theo dõi hình ảnh nào được chọn lần cuối. Nếu bạn cần tìm kiếm đồ họa nổi khá nhiều, điều này có nghĩa là bạn có thể gán macro này cho nút trên thanh công cụ hoặc phím tắt và lần lượt tìm kiếm từng đồ họa nổi trong tài liệu của mì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 (1771) á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: