Hallo,

Till Mendler schrieb:

> Gibt es eine Möglichkeit, Die Groß/Kleinschreibung des ersten
> Buchstaben
> eines Wortes mit einem Tastaturkürzel zu ändern

steht der Cursor innerhalb des betrffenden Wortes sollte das Folgende
das erledigen:

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


Gruß
Jörg



---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Antwort per Email an