Bezeichnungen von Textmarken in "kleinschrift" umwandeln

[komma4]

verkraftet diesen Fehler, OOo hingegen nicht. Kann mir Jemand einen Tipp geben?

Sagen wir mal so:
Ein Programm ist tolerant, das andere genau.
OOo sucht die Textmarke anhand des case-senstivien Namens.
Du suchst ein Makro, welches alle Namen auf Kleinschreibung umsetzt?

[komma4]

Sorry, war mal kurz beschäftigt

Code: Alles auswählen

Sub de27776
' Version 1 ohne Fehlerprüfung

oBookMarks = ThisComponent.getBookmarks()

For i = oBookMarks.Count-1 To 0 Step -1
	oBookMark = oBookMarks.getByIndex( i )
	oBookMark.Name = LCase( oBookMark.Name ) 
Next i

End Sub

Es kommt es bei Verwendung eines gleichen Textmarkennamens in unterschiedlicher Schreibweise bei Nutzung des Makros zu einem Laufzeitfehler des BASIC-Codes. Wie immer: Anwendung auf eigene Gefahr!

[komma4]

Du kannst in OOo eine Textmarke "HUGO" nennen, eine weitere "hugo", die dritte "Hugo".
Bei MS geht das nicht.

Wenn Deine Textmarken aus WORD kommen ist alles OK, da kann mit dem Makro kein Fehler passieren.
Wendest Du das Makro auf ein OOo-Dokument an, in dem sich die drei oben genannten Textmarken befinden, dann kommt es beim zweiten Durchlauf (hugo>hugo) zum Fehler, da Marke Nr. 1 schon so geändert wurde (HUGO>hugo).

Alles klar nun?