If you are looking to use New (text only) option then you have to use below mention Macro. It will do only one thing that is backspace.
Code:
REM ***** BASIC *****
sub Backspace
rem ----------------------------------------------------------------------
rem define variables
dim document as object
dim dispatcher as object
rem ----------------------------------------------------------------------
rem get access to the document
document = ThisComponent.CurrentController.Frame
dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")
rem ----------------------------------------------------------------------
dispatcher.executeDispatch(document, ".uno :SwBackspace", "", 0, Array())
end sub
You have to implement the execution of the above mentioned macro into After inserting AutoText or AutoText entry events.
Bookmarks