Pascal Chantriaux a écrit :
Un truc comme ça par exemple ?
Sub recopierVersLeBas(nF, nZ As String)
Dim feuille As Object, zone As Object, direction As Integer
feuille = ThisComponent.Sheets.getByName(nF)
zone = feuille.getCellRangeByName(nZ)
direction = com.sun.star.sheet.FillDirection.TO_BOTTOM
zone.fillAuto(direction, 1)
End Sub
nF : nom de la feuille
nZ : nom de la zone complète (y compris la première ligne qui sera
copiée dans les suivantes)
Pascal
Gabriel a écrit :
Bonjour,
Je recherche une formule basic pour faire un étirement de formule
calc comme on le fait à la main avec la poignée de recopie. J'ai
cherché sur la toile, sans résultat. J'ai utilisé l'enregistreur de
macro, mais erreur à l'utilisation dans une boucle.
Je suis sous ubuntu avec openoffice 3 téléchargé sur le cite
francophone.
Merci
---------------------------------------------------------------------
To unsubscribe, e-mail: prog-unsubscr...@fr.openoffice.org
For additional commands, e-mail: prog-h...@fr.openoffice.org
---------------------------------------------------------------------
To unsubscribe, e-mail: prog-unsubscr...@fr.openoffice.org
For additional commands, e-mail: prog-h...@fr.openoffice.org
Merci beaucoup. Je ne connaissais pas 'direction =
com.sun.star.sheet.FillDirection.TO_BOTTOM
zone.fillAuto(direction, 1)'. Je vais regarder du coté de l'API pour
plus de renseignements.
Encore merci.
Gabriel
---------------------------------------------------------------------
To unsubscribe, e-mail: prog-unsubscr...@fr.openoffice.org
For additional commands, e-mail: prog-h...@fr.openoffice.org
