Accedi per seguire   
Seguaci 0
Giusto

Creare Una Macro Con Openoffice

5 messaggi in questa discussione

Sto tentando di creare una macro con OpenOffice.

La registro e la salvo.

Quando la mando in esecuzione effettua tutti i comandi meno che un copia ed incolla di una cella verso quella che ho scelto io.

Dove sbaglio?

Spero di essere stato chiaro.

Grazie per l'aiuto.

Condividi questo messaggio


Link di questo messaggio
Condividi su altri siti

è l'ultima istruzione quella che non esegue? se fosse così potresti provare ad accodare una istruzione "nulla"

ho provato a creare una macro di copia incolla... questo è il codice sorgente:

REM ***** BASIC *****

Sub Main

End Sub

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 = "$A$2"

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 = "$C$1"

dispatcher.executeDispatch(document, ".uno:GoToCell", "", 0, args3())

rem ----------------------------------------------------------------------

dim args4(0) as new com.sun.star.beans.PropertyValue

args4(0).Name = "ToPoint"

args4(0).Value = "$C$2"

dispatcher.executeDispatch(document, ".uno:GoToCell", "", 0, args4())

rem ----------------------------------------------------------------------

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

end sub

la macro copia il valore della cella A2 e lo incolla nella cella C2

Condividi questo messaggio


Link di questo messaggio
Condividi su altri siti

Non è l'ultima ed è un valore assoluto.

Non capisco perché non mi registra i comandi copia/incolla mentre tutti gli altri comandi vengono registrati ed eseguiti.

Tutto qui.

Se ti è utile vedi di allegare le celle interessate all'operazione.

Grazie.

Condividi questo messaggio


Link di questo messaggio
Condividi su altri siti

si, prova ad all,egare, vediamo di capirci qualcosa ;)

Condividi questo messaggio


Link di questo messaggio
Condividi su altri siti

Se sei d'accordo ti invio una e-mail con con il file e le indicazioni di quanto mi deve ritornare la macro in fase di esecuzione.

Ciao.

P.s. Con OpenOffice uso solo "regisrtra macro - termina macro e salva macro.

Non so fare altro. Perdona la mia ignoranza.

Condividi questo messaggio


Link di questo messaggio
Condividi su altri siti

Crea un account o accedi per lasciare un commento

Devi essere un utente registrato per partecipare

Crea un account

Iscriviti per un nuovo account nella nostra community. È facile!


Registra un nuovo account

Accedi

Sei già registrato? Accedi qui.


Accedi Ora
Accedi per seguire   
Seguaci 0