Track Changes Protect

asked 2018-06-06 08:52:27 +0200

this post is marked as community wiki

This post is a wiki. Anyone with karma >75 is welcome to improve it.

I need a help with "Track Changes" in Writer. I run macro with method uno:ProtectTraceChangeMode. But LibreOffice show me window with Enter and Confirm fields. Its OK. But I need automation protection of changes in document via macro. How I can set password in parameter for automation run Protect Changes of document? I found nothing details in UNO documentation about ProtectTraceChangeMode method. The main target: Enable\Disable Track Changes protect via macros without input password in GUI of LibreOffice My marco code:

sub Main 
dim document as object 
dim dispatcher as object 
rem get access to the document 
document = ThisComponent.CurrentController.Frame 
dispatcher = createUnoService("com.sun.star.frame.DispatchHelper") 
dim args1(0) as new com.sun.star.beans.PropertyValue 
args1(0).Name = "ProtectTraceChangeMode" 
args1(0).Value = true 
dispatcher.executeDispatch(document, ".uno:ProtectTraceChangeMode", "", 0, args1()) 
end sub

Please, Help. Best regards, Lev Kudryashov.

edit retag flag offensive close merge delete