Hello,
Et voici quelque chose qui devrait t'aider...
sub Fusion
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:ToggleMergeCells", "", 0,
Array())
End Sub
---
Christophe Mathysen
Creanet.be
Internet Solutions - OOo Advies
Phone : +32 4 381 21 51 - Mobile : +32 4 95 93 35 89
Mainplace : Tiège 28 D - 4845 - Sart-Lez-Spa
Technic'Center : Hoofstraat 3 - 3793 - Fourons
BE 0863 843 594 - Fortis 001-3871566-81
Labelisé eTIC#247
Le lun 18/06/2007 à 14:14, zorglub.1er a écrit :
Bonjour,
Comment fusionner plusieures cellules dans calc avec une macro ?
Il me semble qu'on peut utiliser la méthode mergeRange pour
fusionner des cellules de tableau dans Writer, mais je ne sais
pas comment l'utiliser, m'en servir dans Calc.
Sinon, j'ai pensé à une autre solution (je ne sais pas si
c'est réalisable) qui est d'utilisée à travers une macro la
"fonction" déjà existante dans Format->Fusionner les cellules.
Ainsi, dans la macro on "appele" la fonction "Fusionner les
cellules" qu'on trouve dans Format->Fusionner les cellules.
Mais je ne sais pas comment m'y prendre.
D'avance merci pour votre aide ;0)
Créez votre adresse électronique pren...@laposte.net
1 Go d'espace de stockage, anti-spam et anti-virus intégrés.