Scusate, Luca non e' iscritto alla lista (ho approvato io il suo
messaggio), quindi inoltro anche a lui in CC la risposta di Paolo che
lascio qui sotto.
Luca, puoi seguire questa e le altre risposte su
http://openoffice.org/projects/it/lists/utenti/archive/
e in particolare nei link a fondo pagina in
http://openoffice.org/projects/it/lists/utenti/archive/2011-12/message/0
Perdonate anche i messaggi ripetuti e le prove tecniche degli ultimi
giorni, contiamo di stabilizzare la situazione a breve.
Ciao,
Andrea.
Il 12/12/2011 15:18, Paolo Mantovani ha scritto:
Il 30/11/2011 18:21, Luca A ha scritto:
Aiuto!!
Non so se quello che mi serve devo chiederlo qui .
Prego altrimenti darmi dritte dove orientarmi.
il posto è giusto
Sono da un anno circa che utilizzo molto Ooo e stò sperimentando le
macro del foglio di calcolo.
Mi voglio costruire un semplice "programma" per realizzare dei semplici
computi metrici.
Stò sperimentando le macro del foglio di calcolo in "registrazione" ma
essendo a digiuno completo
del linguaggio utilizzato per modificarle come vorrei vado a estenuanti
tentativi che non portano a nulla.
Purtroppo il registratore di macro di OOo, anche se perfettamente
utilizzabile non è istruttivo come quello di Excel.
La mia difficoltà stà nel fatto che ho la necessita di copiare un'area
definita di una parte del foglio
o di un altro foglio e incollarla sempre nel foglio di calcolo
esempio di copia di un range:
REM ***** BASIC *****
Sub esempio_copia_range
'ottieni un riferimento al documento Calc
oDoc = ThisComponent
'ottieni un riferimento alle tabelle sorgente e destinazione
oShSrc = oDoc.Sheets(0)
oShDest = oDoc.Sheets(1)
'ottieni gli indirizzi sorgente e destinazione
aSrc = oShSrc.getCellRangeByName("A1:C3").RangeAddress
aDest = oShDest.getCellRangeByName("C1").CellAddress
'copia il range
oShDest.copyRange(aDest, aSrc)
End Sub
ma nella
cella in cui clicco con
il mouse quindi variabile (stessa colonna ma riga diversa di volta in
volta).
In questo caso devi sostituire l'indirizzo di destinazione con
l'indirizo della selezione attuale:
es:
aDest = oDoc.CurrentSelection(0).CellAddress
Spero di essere stato di aiuto
saluti
Paolo Mantovani
--
------------------------------------------------------------------------
Per cancellarsi: scrivere a utenti-unsubscr...@it.openoffice.org
Per altre operazioni: http://openoffice.org/projects/it/lists
