For i = 0 to oBookmarks.getCount() - 1 step 1 oMark = oBookmarks.getByIndex(i) oAnchor = oMark.getAnchor() If Len(oAnchor.getString()) > 1 Then sName = oMark.getName() oStartRange = oAnchor.getStart()
oNewMark = oDoc.createInstance("com.sun.star.text.Bookmark") oNewMark.setName(sName) oText.removeTextContent(oMark) oText.insertTextContent(oStartRange, oNewMark, False) End If Next End Sub