微调 goto 书签 libreoffice 宏

Question

我有一个 libreoffice 宏可以转到某个书签（“qui”）

sub vai_qui
ViewCursor = ThisComponent.CurrentController.getviewCursor()
Bookmark = ThisComponent.Bookmarks.getByName("qui").Anchor
ViewCursor.gotorange(Bookmark, False)
end sub

问题有两个：

1. 这是一个 libreoffice 宏，因此它也可以与 Calc 和 Base 一起运行，我希望避免 Calc 和 Base 中出现错误消息；
2. 使用此宏将光标转到书签，但 Writer 的 焦点 不在光标上：我更愿意避免这种情况并专注于光标。

谢谢

Answer 1

正如你在LibreOffice forum***上所说的那样：

• 如果您没有 Writer 文档，请避免调用宏

• 检查文档类型

  If NOT ThisComponent.supportsService("com.sun.star.text.TextDocument" ) Then
     Exit Sub  
  End If
  

• 检查书签是否存在

  oBookmarks = ThisComponent.getBookmarks()  
  If NOT oBookmarks.hasByName("qui") Then
  

*** 交叉发布问题而不提及您寻求帮助的其他论坛，这是冒犯了那些利用空闲时间提供帮助的志愿者。