[Solved] Turn Tools-Autoinput Off By Macro If it is On

[Dheeraj]

I want to Turn Autoinput Off (Tools-Autoinput) by Macro. I have recorded a macro which toggles AutoInput. This macro does not serve my goal as it Turns On AutoInput if it is already Off. My goal is - if Autoinput is off, do nothing else turn Autoinput Off. Any help is greatly appreciated.

Recorded Macro is here mentioned below:

Code: Select all

Sub Autoinput
Dim document as object
Dim dispatcher as object

document = ThisComponent.CurrentController.Frame
dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")

dispatcher.executeDispatch(document,".uno:AutoComplete","",0,Array())

End Sub

[Villeroy]

Code: Select all

srv = createUnoService('com.sun.star.sheet.GlobalSheetSettings')
srv.DoAutoComplete = False

[Dheeraj]

Thanks for Replying Villeroy..

Your Solution is perfect. In my case using Libreoffice, this code is different which is as follows:
srv.DoAutoComplete = False

Problem Solved.

[Villeroy]

Sorry, that was a typo. I had only the first line in clipboard.