Giả sử điểm chèn nằm trong dấu trang, John tự hỏi làm thế nào anh ta có thể sử dụng VBA để khám phá tên của dấu trang đó và chọn tất cả văn bản trong dấu trang.

Có một số thủ thuật cần ghi nhớ khi làm việc với dấu trang. Đầu tiên, tốt nhất là không nên cho rằng điểm chèn nằm trong dấu trang. Thay vào đó, bạn có thể xác minh xem nó có nằm trong dấu trang hay không bằng cách sử dụng mã sau:

BkMkCount = Selection.Bookmarks.Count

Khi được thực thi, BkMkCount sẽ chứa một giá trị cho biết số lượng dấu trang. Nếu bạn chỉ mong đợi một dấu trang duy nhất, thì bạn có thể xác minh rằng biến đó bằng 1 trước khi bạn tiếp tục với mã của mình.

Nếu bạn muốn tìm ra tên của dấu trang, bạn có thể sử dụng như sau:

BkMkName = Selection.Bookmarks(1).Name

Nếu sau đó bạn muốn chọn tất cả văn bản trong dấu trang, hãy sử dụng như sau:

Selection.Bookmarks(1).Select

Để kết hợp tất cả các khái niệm này với nhau, bạn có thể sử dụng cấu trúc như sau:

BkMkCount = Selection.Bookmarks.Count If BkMkCount = 1 Then     With Selection.Bookmarks(1)

BkMkName =.Name         .Select     End With End If

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