Discussion :

[elsouljacker]

Bonjour,

Je voudrais pouvoir modifier l'alignement de cellules dans un classeur .xls via Delphi (gauche, droite, centré, etc)
J'ai vu la solution pour OpenOffice mais je trouve rien de semblable pour Excel

Si qq'un a déjà fait ça ou connait la solution...

Bonne journée !

[TicTacToe]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

MonRange(.HorizontalAlignment ou .VerticalAlignment) := (xlCenter,xlJustify,xlLeft,xlRight)

devrait être correct

[anapurna]

salut

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
ExcelApp.Selection.HorizontalAlignment := xlHAlignleft;
ExcelApp.Selection.VerticalAlignment   := xlVAlignCenter;

ou encore

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

ExcelApp.ActiveSheet.Range['A1:A1'].HorizontalAlignment := xlCenter;

@+ Phil

[elsouljacker]

Merci pr les réponses, c'est parfait à un détail près:

en utilisant xlCenter,xlJustify,xlLeft,xlRight j'obtient une erreur
"Unable to set the HorizontalAlignment property of the Range class"

L'instruction fonctionne en remplaçant les valeurs :
xlRight = -4152
xlLeft = -4131
xlCenter = -4108
xlJustify = -4130
qui sont les numéros associés aux constantes.