用VBA怎样得到光标位置向下最近一个书签的名称?

助人为乐 · 发表于 2004-9-16 11:52

不知有没有什么简便方法.哎.问题太多了...麻烦守版主了.

守柔 · 发表于 2004-9-16 12:30

请参：

Sub GetBookMark() Dim MyRange As Range On Error Resume Next Set MyRange = Me.Range(Selection.End, Me.Content.End) Err.Number = 0 MyRange.Bookmarks(1).Select If Err.Number <> 0 Then Err.Clear MsgBox "Word未找到书签!", vbOKOnly + vbInformation End If End Sub

[此贴子已经被作者于2004-9-16 12:31:27编辑过]

		自动登录	找回密码
密码			免费注册