Hallo Walter, Am 8 Aug 2006 um 8:31 hat Walter Werner geschrieben:
> Im oo-writer, mit einer aktiven Markierung, lässt sich unter > "Format" die Gross/Kleinschreibung umschalten. Es wäre sehr > praktisch, wenn dort auch ein Punkt "grosse Anfangsbuchstaben, Rest > klein" als dritte Auswahlmöglichkeit mit aufgenommen werden könnte. du kannst dir dieses Makro installieren und mit "Anpassen" auf den gewünschten Tastenkürzel legen: Sub klein_gross() dok = thiscomponent textCursor = dok.text.createtextcursor() viewCursor = dok.GetCurrentController.ViewCursor textCursor.gotoRange(viewCursor,false) textCursor.gotoStartofWord(False) textCursor.goRight(1,True) buchstabe = textCursor.String if ASC(buchstabe)>64 AND ASC(buchstabe)<91 Then wert = ASC(buchstabe)+32 textCursor.String = CHR(wert) end If if ASC(buchstabe)>96 AND ASC(buchstabe)<123 Then wert = ASC(buchstabe)-32 textCursor.String = CHR(wert) end If End Sub -- Einen schönen Tag noch. Mit freundlichem Gruß Edgar Kuchelmeister ### Anwenderbetreuer users-Mailingliste ### [EMAIL PROTECTED] --------------------------------------------------------------------- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
