Buonasera a tutti, premetto che sono appena approdato su LibreOffice in quanto fino ad oggi ho sempre usato OpenOffice che però ha iniziato a darmi problemi di crash continui.
Il primo problema che ho riscontrato è che la maggior parte delle macro che ho (create quasi interamente con la funzione registra macro di OpenOffice) funziona solo in particolari condizioni
La macro che mi servirebbe di più copia semplicemente del testo da una casella ad una’altra in Calc, il problema è che se la faccio eseguire ad esempio all’apertura del documento va bene, mentre se la eseguo a documento aperto manualmente non fa la copia ma continua a incollare quanto nella clipboard.
La macro è questa: sub Prova
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 ----------------------------------------------------------------------
dim args1(0) as new com.sun.star.beans.PropertyValue
args1(0).Name = “ToPoint”
args1(0).Value = “$AJ$18”
dispatcher.executeDispatch(document, “.uno:GoToCell”, “”, 0, args1())
rem ----------------------------------------------------------------------
dispatcher.executeDispatch(document, “.uno:Copy”, “”, 0, Array())
rem ----------------------------------------------------------------------
dim args3(0) as new com.sun.star.beans.PropertyValue
args3(0).Name = “ToPoint”
args3(0).Value = “$B$17”
dispatcher.executeDispatch(document, “.uno:GoToCell”, “”, 0, args3())
rem ----------------------------------------------------------------------
dispatcher.executeDispatch(document, “.uno:PasteUnformatted”, “”, 0, Array())
end sub
ho provato anche a registrarne una nuova in un documento nuovo creato direttamente in LibreOffice ma il problema rimane lo stesso.
Grazie mille a chi mi darà una mano!