Rất có thể bạn đã biết cách sử dụng dấu trang. (WordTips khác mô tả cách xác định và thao tác với chúng.) Nếu bạn đang tạo macro, bạn có thể cần truy xuất tên của các dấu trang được xác định trong tài liệu.

VBA cho phép bạn truy xuất tên dấu trang bằng cách sử dụng thuộc tính Tên với các thành viên của bộ sưu tập Dấu trang. Cú pháp của câu lệnh như sau:

x = ActiveDocument.Bookmarks(y).Name

trong đó y là con trỏ bù đắp đến tên dấu trang mong muốn. Sau khi thực hiện câu lệnh, x sẽ chứa tên của dấu trang được chỉ định bởi con trỏ. Để làm cho chức năng này hữu ích, bạn thực sự nên đọc tất cả các tên dấu trang thành một mảng, sau đó bạn có thể thao tác. Đoạn mã sau sẽ thực hiện thủ thuật:

Dim Bmk() As String Dim x As Integer, J As Integer

x = ActiveDocument.Bookmarks.Count ReDim Bmk(x)

For j = 1 to x     Bmk(j) = ActiveDocument.Bookmarks(j).Name Next j

Lưu ý rằng đoạn mã này sử dụng câu lệnh ReDim, cho phép bạn thay đổi động số phần tử trong một mảng. Lý do cho cách tiếp cận này khá đơn giản: Mảng Bmk cần có càng nhiều phần tử càng có nhiều dấu trang xác định. Tuy nhiên, bạn không thể biết trước khi thực hiện dòng thứ ba của mã này chính xác là bao nhiêu. VBA yêu cầu tất cả việc ghi kích thước (sử dụng Dim) phải được thực hiện _ trước khi thực hiện bất kỳ mã chương trình thực tế nào. Do đó, Dim đầu tiên cho Bmk là để thỏa mãn VBA và ReDim của Bmk được thực hiện để đặt mảng ở kích thước cần thiết.

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