Ah, ok, ottimo! La macro test funziona anche se non riesco a capire
perché mi crea comunque un documento di writer nuovo vuoto oltre ad
inserire le celle copiate nel documento corrente. E' forse quella cosa
che dicevi non riuscire a chiudere la finestra attiva?
Comunque l'importante è che funzioni anche se mi pare strano che sia
così macchinoso!
Grazie!
Stefano
Davide Prina ha scritto:
--- Dom 12/10/08, Stefano Turcato ha scritto:
Mi domando se sono io a non essere in grado o se è davvero
impossibile copiare delle celle da calc in una tabella esistente
in writer.
non sono capace neppure io di fare la copia diretta ...
Però è possibile raggiungere lo stesso risultato con alcuni passaggi in più:
a) copi le celle di OOoCalc (Ctrl-C)
b) ti posizioni su Writer, non su una tabella, ed incolli come testo (Modifica ->
Incolla speciale -> Testo non formattato)
c) selezioni il testo appena incollato nel punto b)
d) premi il tasto per creare una tabella (Ctrl-F12)
e) selezioni i dati nella nuova tabella creata nel punto d) e li copi (Ctrl-C)
f) ti posizioni sulla tua tabella e li incolli (Ctrl-V)
Di sicuro è possibile fare una macro richiamabile con un pulsante che fa tutti
i seguenti passi:
1) apre una nuova finestra di OOoWriter (macro test1)
2) si posiziona sulla finestra aperta al punto 1
3) incolla "Testo non formattato" (è quello che hai copiato in OOoCalc)
4) seleziona tutto (Ctrl-A)
5) crea una tabella (Ctrl-F12)
6) seleziona tutto due volte (Ctrl-A + Ctrl-A)
7) copia
8) chiude la finestra aperta al punto 1
a questo punto puoi incollare il testo nella tabella di OOoWriter
Ho creato le due macro qui sotto (test e test1) con il registratore di macro
però mi mancano alcuni pezzi che non so fare.
* test1 apre un nuovo documento di OOoWriter
* ora però non so far posizionare l'esecuzione successiva della macro nella
nuova finestra
* test fa tutti i passi da a 7
* ora non so chiudere la finestra attiva
sub test
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")
dispatcher.executeDispatch(document, ".uno:AddDirect", "", 0, Array())
rem ----------------------------------------------------------------------
dim args1(0) as new com.sun.star.beans.PropertyValue
args1(0).Name = "SelectedFormat"
args1(0).Value = 1
dispatcher.executeDispatch(document, ".uno:ClipboardFormatItems", "", 0,
args1())
rem ----------------------------------------------------------------------
dispatcher.executeDispatch(document, ".uno:SelectAll", "", 0, Array())
rem ----------------------------------------------------------------------
dispatcher.executeDispatch(document, ".uno:InsertTable", "", 0, Array())
rem ----------------------------------------------------------------------
dispatcher.executeDispatch(document, ".uno:SelectAll", "", 0, Array())
rem ----------------------------------------------------------------------
dispatcher.executeDispatch(document, ".uno:SelectAll", "", 0, Array())
rem ----------------------------------------------------------------------
dispatcher.executeDispatch(document, ".uno:Copy", "", 0, Array())
end sub
sub test1
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 ----------------------------------------------------------------------
dispatcher.executeDispatch(document, ".uno:AddDirect", "", 0, Array())
end sub
Ciao
Davide
Dizionari: http://linguistico.sourceforge.net/wiki
Esci dall'illegalità: utilizza OpenOffice.org:
http://linguistico.sourceforge.net/wiki/doku.php?id=UsaOOo
GNU/Linux User: 302090: http://counter.li.org
--
Non autorizzo la memorizzazione del mio indirizzo su outlook
Scopri il blog di Yahoo! Mail:
Trucchi, novità e scrivi la tua opinione.
http://www.ymailblogit.com/blog
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
