Macro per proteggere foglio Calc con Password fissa - Salva

[GioC79]

Mi riporto alla macro gentilmente concessa da “schiavinatto”…
sub BloccaMag

ThisComponent.getCurrentController.getActiveSheet().Protect(“123456”)

end sub
Questa macro permette di proteggere un foglio con una password fissa.

Macro per proteggere foglio Calc con Password fissa

Vorrei capire come modificarla, in modo che lo stato del foglio passasse in automatico a “salvato”
senza dover fare “Save” manualmente, una volta lanciata.
Se dovessi dimenticare di farlo, il foglio rimarebbe allo stato non protetto dopo le modifiche.
Grazie a chi mi aiuterà!

[schiavinatto]

If it is protected, I was unable to edit it, I will have to unprotect it.

If you connect to the spreadsheet/content changed event to protect the spreadsheet and save, with each new change you will have to unprotect it. That won’t be practical.

[GioC79]

Maybe in italian, my request was translated bad…
I have my protected sheet trough the macro.
I need to make some changes, so i Unprotect my sheet. I make my changes.
After, i will launch the protect macro for protecting the sheet again.
This works fine, but i have to manually SAVE to apply.
So is it possible, to add a string to the protect code for saving changes, instead of doing it manually?

[schiavinatto]

Ci scusiamo per la risposta in inglese, segui il complemento macro.

sub BloccaMag
ThisComponent.getCurrentController.getActiveSheet().Protect(“123456”)
CreateUnoService("com.sun.star.frame.DispatchHelper") _
.executeDispatch(ThisComponent.CurrentController. _
Frame, ".uno:Save", "", 0, Array())
end sub

[GioC79]

schiavinatto sei un GRANDE!

Tutto funziona alla perfezione. Grazie!

Per chi legge per imparare, ho semplicemente scritto la mia richiesta iniziale in inglese…
Per motivi di traduzione.
La soluzione concessa da schiavinatto è perfetta e fà cio che ho richiesto.