Alles löschen im Makro

[paulderfinne]

Hallo liebe Programmiergemeinde,

Mein Anliegen sagt der Titel: Wie kann ich im Writer- Makro alles löschen. Also das auzsführen, was ein strg+a und anschließend Löschen-Rück bzw. Entf. tun?

Mit dem Makrorecorder tat sich gar nichts.

[F3K Total]

So?

Code: Alles auswählen

Sub delete_all
    oTextCursor = thiscomponent.Text.createTextcursor
    oTextCursor.collapseToStart
    oTextCursor.gotoend(true)
    oTextCursor.String = ""
End Sub

Gruß R

[paulderfinne]

Jepp. Das Funktioniert. Vielen Dank F3K Total.

Möchte nur mal wissen, woher ihr immer dieses Wissen habt.

[karolus]

Hallo

...Wobei das auch in einer Zeile geht.

Code: Alles auswählen

Sub delete_all
    thiscomponent.Text.String = ""
End Sub

Karolus