Bonjour,
Merci c'est super ;0)
Je me permets de modifier le code pour qu'il me soit plus
simple de lecture.
Voici une mini macro fonctionnelle qui permet une fusion de
deux cellules :
--------------------------------------------------------
REM ***** BASIC *****
Sub ExampleFusion
thisComponent.Sheets.getByName("Feuille1").getCellByPosition(3,1).String
= "KiKO"
thisComponent.Sheets.getByName("Feuille1").getCellRangeByPosition(3,
1, 4, 1).merge(true)
End Sub
----------------------------------
Toutefois, comment faire pour que le mot KIKO soit centré, au
centre des deux cellules fusionnées ?
Dans l'actuelle macro KIKO est tout à gauche dans les deux
cellules fusionnées.
Merci d'avance ;0)
ps : Il me semble que CellStyle ne soit pas utile pour une
fusion de cellules.
D'ailleurs, dans la macro cité plus bas je ne fais pas bien la
différence entre CellStyle - service et CellStyle - property
http://api.openoffice.org/docs/common/ref/index-files/index-3.html
Bonjour, je te colle ci-dessous une partie de code qui
fusionne deux cellules afin d'avoir une grande cellule pour
avoir assez de place pour un code et un libellé :
cell = maFeuille.getCellByPosition(5, i)
cell.String = Cli & " " & NomCli
cell = maFeuille.getCellRangeByPosition(5, i, 6, i)
cell.merge (true)
cell.CellStyle = "client"
En esperant que ceci réponde à ta question.
Cordialement
Abi SAHLI
Créez votre adresse électronique pren...@laposte.net
1 Go d'espace de stockage, anti-spam et anti-virus intégrés.
2 messages in org.openoffice.fr.progRe:[prog] fusionner des cellules calc
