大家好，這是我新推出的一套教程：《VBA之Word應用》，是專門講解VBA在Word中的應用，教程圍繞“面向對象編程”講解，首先讓大家認識Word中VBA的對象，以及對象的屬性、方法，然後通過實例讓大家感受到Word VBA 的妙處。

本套教程共三冊十六章，其中前十五章是各種對象屬性、方法的講解，每節都有專門的實例說明這些屬性方法的具體應用，最後一章是結和具體應用場景的講解，共有二十八個實際工作中常見的實例。下面是第二章“書簽集合Bookmarks對象及書簽Bookmark對象”内容，今日講解的是第一節：文檔（Document）的書簽

對于使用Word經驗較多的朋友而言，在文檔中使用書簽，可以利于閱讀，創建書簽後，您可以在文檔中添加指向它們的鍊接或随時跳轉到這些書簽。如何跳轉到書簽呢？按 Ctrl G，以打開“查找和替換”框中的“定位目标”下,單擊“書簽”。輸入或選擇書簽名稱, 然後單擊“定位”。如下圖：

或者在文檔的菜單中點擊“書簽”，也可以顯示文檔中的所有書簽：

選擇好書簽後，點擊定位，就可以轉到我們需要的位置了。本節中将給大家詳細地講解文檔中書簽有關的一些VBA操作，包括個數的統計，書簽的添加，書簽的删除等等。

語法：expression.Bookmarks

其中expression為一個文檔對象

說明：這個屬性返回一個書簽集合(Bookmarks), 該集合代表文檔中的所有書簽。 此為隻讀屬性。

從以上的簡單介紹中我們看出，書簽同樣是文檔的屬性之一，既然是文檔的屬性，就代表了文檔的特征和性質，我們就可以利用屬性的操作進行系列的設置和提取特征了。順便再給大家強調一點，我的系列教程是有學習先後順序的，這套教程一定要在《VBA之Excel應用》之後學習，因為這套教程中對于VBA中一些常見語法、函數不再單獨講解，是拿來即用，以免課程内容的重複。

代碼示例：下面的代碼将提取當前文檔中所有的書簽，并提示給用戶。

Sub mynz() '顯示書簽

Dim A()

Dim mybookmark As Bookmark

If ActiveDocument.Bookmarks.Count >= 1 Then

ReDim A(ActiveDocument.Bookmarks.Count - 1)

i = 0

For Each mybookmark In ActiveDocument.Bookmarks

A(i) = mybookmark.Name

uu = uu & " " & A(i)

i = i 1

Next

End If

MsgBox "當前文檔中的書簽有：" & Chr(13) & uu

End Sub

代碼截圖：

1）Dim A() 定義一個動态數組記錄書簽名

2) Dim mybookmark As Bookmark 定義書簽變量

3) ActiveDocument.Bookmarks.Count 當前文檔書簽的個數

4) ReDim A(ActiveDocument.Bookmarks.Count - 1) 給數組擴容

5) For Each mybookmark In ActiveDocument.Bookmarks

A(i) = mybookmark.Name

uu = uu & " " & A(i)

i = i 1

Next

End If

以上遍曆所有書簽，并将書簽放在數組中，同時提取數據的名稱。

6) MsgBox "當前文檔中的書簽有：" & Chr(13) & uu

提示給用戶書簽的所有名稱。

代碼的運行測試：

1）在當前文檔中“Doc 002文件”中的書簽如下截圖：

截圖可以看出，一共是四個書簽，我們運行程序：

3）運行結果：

可見，程序的運行結果和我們期望是一緻的。

為了下面内容講解的方便，我要在文檔中顯示已經添加的書簽。為了顯示書簽，可以采用下面的步驟，在“選項”窗口，找到“顯示文檔内容”，勾選“顯示書簽”

這個時候我們就可以在文檔中顯示書簽了：

今日内容回向：

1 文檔的書簽屬性意義是什麼？

2 如何統計書簽的個數？

3 如何顯示書簽？

本講内容參考程序文件：Doc 002文檔.docm

• VBA是利用Office實現個人小型辦公自動化的有效手段（工具）。這是我對VBA的應用界定。如何學習VBA呢? 概括的說就是: 學習過程中要信、解、受、持，更要有回向的業力。無論您在學習的任何階段，都要對照教程的知識點加持自己的實際工作，總會有豐厚的收獲。
• 我根據自己多年VBA實際利用經驗，推出了八部VBA專門教程。第1套教程：VBA代碼解決方案 ；第2套教程：VBA數據庫解決方案；第3套教程：VBA數組與字典解決方案；第4套教程：VBA代碼解決方案之視頻（第一套的視頻講解）；第5套教程：VBA中類的解讀和利用；第6套教程：VBA信息獲取與處理；第7套教程：VBA之EXCEL應用；第8套教程：VBA之Word應用（最新）。上述教程的學習順序：

① 7→1→3→2→6→5或者7→4→3→2→6→5 ② 7→8

• 第一套：VBA代碼解決方案 是VBA中各個知識點的講解，教程共147講，覆蓋絕大多數的VBA知識點，提供的程序文件更是一座不可多得的代碼寶庫，是初學及中級人員必備教程；目前這套教程提供的版本是修訂第二版，程序文件通過32位和64位兩種OFFICE系統測試。
• 第二套：VBA數據庫解決方案 數據庫是數據處理的專業利器，教程中詳細介紹了利用ADO連接ACCDB和EXCEL的方法和實例操作，适合中級人員的學習。目前這套教程提供的是修訂第一版教程，程序文件通過32位和64位兩種OFFICE系統測試。
• 第三套：VBA數組與字典解決方案 數組和字典是VBA的精華，字典是VBA代碼水平提高的有效手段，值得深入的學習，是初級及中級人員代碼精進的手段。目前這套教程提供的版本是修訂第一版，程序文件通過32位和64位兩種OFFICE系統測試。
• 第四套：VBA代碼解決方案之視頻 是專門面向初學者的視頻講解，可以快速入門，更快的掌握這門技能。這套教程是第一套教程（修訂一版）的視頻講解，視頻更易接受。
• 第五套：VBA中類的解讀和利用 這是一部高級教程，講解類的虛無與肉身的度化，類的利用雖然較少，但仔細的學習可以促進自己VBA理論的提高。這套教程的領會主要是讀者的領悟了，領悟一種佛學的哲理。目前這套教程提供的版本是修訂第一版，程序文件通過32位和64位兩種OFFICE系統測試。
• 第六套教程：VBA信息獲取與處理，這是一部高級教程，涉及範圍更廣，實用性更強，面向中高級人員。教程共二十個專題，包括：跨應用程序信息獲得、随機信息的利用、電子郵件的發送、VBA互聯網數據抓取、VBA延時操作，剪切闆應用、Split函數擴展、工作表信息與其他應用交互，FSO對象的利用、工作表及文件夾信息的獲取、圖形信息的獲取以及定制工作表信息函數等等内容。程序文件通過32位和64位兩種OFFICE系統測試。
• 第七套教程：VBA之EXCEL應用 這是一部初級教程這部教程共三冊，從從創建宏、對話框、工作簿和工作表對象、單元格對象等基礎内容講起，到循環結構、錯誤處理、字符串操作、日期和時間、事件、數組應用，函數過程等方面，一直講解到控件和窗體對象的應用都是我們提高自己EXCEL水平的必須。
• 第八套教程：VBA之WORD應用 是圍繞“面向對象編程”展開的講解，讓大家充分認識Word中VBA的對象，以及對象的屬性、方法及利用。教程共分三冊，十六章，其中前十五章是各種對象屬性、方法的講解，每節都有專門的實例說明這些屬性方法的具體應用，最後一章是結和具體應用場景的講解，詳細講解了二十八個實際工作中有代表性的實例，緊扣word數據的批量處理，發揮VBA的長處。本套教程實例衆多，大家可以拿來即用，或者修正後加以利用。由于這套教程是圍繞“面向對象編程”來展開，建議大家先學《VBA之Excel應用》，對VBA中的對象、屬性、方法、事件有一定認識後再來學習這套教程。

更多精彩资讯请关注tft每日頭條，我们将持续为您更新最新资讯!