Lionel Corgnet - Association Vélocampus a écrit :
Bonjour,
Je m'initie aux macros sous OOo, et suis donc débutant dans le
développement en BASIC (avec tout de même de bonnes bases ne
développement :)
Pour le moment, je cherche à copier simplement le résultat de la
formule d'une cellule vers une autre cellule.
Par ailleurs, quel(s) livre(s) ou documentation(s) me
conseilleriez-vous pour appréhender le développement des macros.
D'avance merci.
Bonjour Lionel,
Un exemple simple :
Sub ExempleSimple
Dim oDocument As Object, oSheet As Object, oCell As Object
Dim Contenu As Variant
oDocument=ThisComponent
oSheet=oDocument.Sheets.getByName("Feuille1")
'
oCell=oSheet.getCellByPosition(0,0)
Contenu =Ocell.Value
'
oDocument.Sheets.getByName("Feuille1").getCellByPosition(2,
2).setValue(Contenu)
End Sub
Tu remarqueras les déclarations indispensables
On lit la valeur contenue en A1 et on la recopie en C3 (les n° Ligne et
colonne commencent à zéro)
L'écriture est différente pour l'écriture. On peut détailler avec :
oCell=oSheet.getCellByPosition(2, 2)
oCell.setValue(Contenu)
Si la cellule est un texte, il faut écrire :
Ocell.String à la lecture
et
oCell.setString à l'écriture
Si ça t'interesses, regardes ici :
http://christianwtd.free.fr/index.php?rubrique=MenuProgram
En espérant aider un peu.
Bon surf,
Christian
--
Visitez http://christianwtd.free.fr/ pour débuter avec Calc, d'OpenOffice.org
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]