《VBA之Word应用》（版权10178982），是我推出第八套教程，教程是专门讲解VBA在Word中的应用，围绕“面向对象编程”讲解，首先让大家认识Word中VBA的对象，以及对象的属性、方法，然后通过实例让大家感受到Word VBA 的妙处。
这套教程是专门针对WORD VBA 的教程，是VBA中的稀缺资源，我给这套教程分归为中级教程，希望大家在VBA入门后再学习这套教程，这样会更加深入的理解面向对象编程的意义。
本套教程共三册十六章，今日内容为第二章部分：VBA之Word应用第二章：利用Bookmark属性返回选择区域的开始和结束位置
【分享成果，随喜正能量】 生活就是这样，不要复杂化，不要悲情化，不要脆弱化，别把人生活成一场悲惨新高度，别太为难了自己，学会愉快一些，幽默一些，认清自己不过就是一个100多斤的孩子，许多烦恼就轻松而解了。。
第四节 书签(Bookmark) 对象
所谓书签（Bookmark）对象，是文档中、或者选定内容或区域中的单个书签。我们这讲的内容就是讲解书签的有关知识点，仍是按照属性、方法并结合一些实例来讲解。希望大家进一步认识书签集合及书签。
1 Bookmark.Name 属性
这个属性返回指定对象的名称。是只读的字符串。
语法：expression.Name
其中expression表示一个书签对象
2 Bookmark.Start 属性
这个属性返回或设置书签的起始字符位置。是可读写的 Long
语法：expression.Start
其中：expression代表一个书签对象.
- 如果此属性的值设置为一个大于End属性的值，那么End属性的设置将调整为和Start属性中的值相同。
- 书签对象包括起始字符和结束字符位置。起始字符位置为距文档开头部分最近的位置。
- Bookmark.Start 属性返回起始字符相对于文档开头部分的位置。文本主体部分 (wdMainTextStory) 的起始字符位置为 0（零）。通过设置该属性可以更改书签的大小。
3 Bookmark.End 属性
这个属性返回或设置选定内容、区域的书签结束字符位置。可读写的 Long 。
语法：expression.End
其中expression代表一个书签对象
- 如果此属性设置为一个值小于Start属性，则Start属性将调整为和End属性相同的值 (即，Start和 End属性相等)。
- 该属性返回结束字符，是相对于文档开头部分的位置。文档主要文字部分 (wdMainTextStory) 的起始字符位置为 0。通过设置该属性可以更改书签的大小。
4 Bookmark.Range 属性
返回一个 Range 对象，该对象代表指定对象所含的部分文档。
语法：expression.Range
其中expression代表一个书签对象
5 Bookmark.Delete 方法
这种方法将删除指定的书签。
语法：expression.Delete
其中expression代表一个书签对象
6 Bookmark.Select 方法
选择指定书签。
语法：expression.Select
其中expression代表一个书签对象
7 利用Bookmark属性返回选择区域的开始和结束位置
在上面我们学习了关于书签的一些属性和方法，这里我们讲解一个实例，这个实例中我们会首先选择一个书签，然后提示给用户选择区域的开始和结束字符的位置，我们先看下面的代码：
Sub mynzE()
Dim myString As String
myString = "myBookmarkB"
If ActiveDocument.Bookmarks.Exists(myString) = True Then
ActiveDocument.Bookmarks(myString).Select
MsgBox "选择位置开始于第" & ActiveDocument.Bookmarks(myString).Start & "字符，结束于第" & ActiveDocument.Bookmarks(myString).End & "字符"
End If
End Sub
代码的截图：
代码讲解：
1） myString = "myBookmarkB" 自定义一个书签
2） If ActiveDocument.Bookmarks.Exists(myString) = True 判断这个书签是否存在。
3） ActiveDocument.Bookmarks(myString).Select 如果这个书签存在，则选择书签
4） MsgBox "选择位置开始于第" & ActiveDocument.Bookmarks(myString).Start & "字符，结束于第" & ActiveDocument.Bookmarks(myString).End & "字符"
这句代码利用了书签的Start和End属性返回书签第一个字符和最后一个字符在文档中的位置。
代码的运行结果：
- 在反馈的结果中，字符的位置和我们视觉看到的有所不同，请大家留意我之后关于段落对象的讲解。
今日内容回向：
1 书签对象的属性和方法有哪些？
2 如何提示给用户选择区域开始字符位置和结束字符的位置？
本讲内容参考程序文件：Doc 002文档.docm
分享成果，随喜正能量
我20多年的VBA实践经验，全部浓缩在下面的各个教程及应用工具中：
