Libellé de plus de 240 caractères

**Eric93** · 19/12/2007, 12h18

Bonjour,

J'ai le code suivant me permettant de mettre en forme le libellé en entête de mes feuilles Excel sur plusieurs colonnes et d'aller à la ligne si il est long :

Code :

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

1
2
Worksheets(feuille).Range(Cells(1, 1), Cells(1, n_col)).HorizontalAlignment = xlCenterAcrossSelection
Worksheets(feuille).Rows(1).WrapText = True

Ce libellé est auparavant issu d'une variable et affecté à Cells(1,1)

Mon problème est que quand ce libellé est très long (j'ai compté environ 240 caractères), j'obtiens #################### dans ma cellule

Merci de votre aide

**RemiT** · 19/12/2007, 12h29

si une valeur est trop longue ( ne rentre pas dans la largeur de la colonne ) Excel affiche des ###

- soit tu élargis ta colonne ( voir image jointe )
- soit tu sélectionnes ta cellule puis "Format"/"Cellule"/ onglet "Alignement" et tu coches "Renvoyer à la ligne automatiquement"

**ouskel'n'or** · 19/12/2007, 12h49

Ou par macro

Code :

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

    Columns(NoColonne).AutoFit

**Eric93** · 19/12/2007, 13h14

Mon libellé s'affiche sur plusieurs colonnes par l'instruction :

Code :

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

.HorizontalAlignment = xlCenterAcrossSelection

appliqué sur la ligne 1, colonnes de 1 à n

et quand il est plus long que mes n colonnes, il s'affiche avec des retours à la ligne par l'instruction :

Code :

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

.WrapText = True

appliqué sur la ligne 1 (ajuste la hauteur de la ligne)

Ca marche bien, mon seul problème provient d'un seul cas ou mon libellé comporte plus de 240 caractères

Réponse à Remit :

J'utilise effectivement l'option "Renvoyer à la ligne automatiquement" par l'instruction

Code :

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

.WrapText = True

Reponse à ouskel'n'or :

J'ai déja effectué un

Code :

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

.AutoFit

sur toute mes colonnes et de plus ma cellule s'affiche sur plusieurs colonnes par l'instruction

Code :

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

.HorizontalAlignment = xlCenterAcrossSelection

Apparamment 240 caractère est une limite, je sais pas trop

**ouskel'n'or** · 19/12/2007, 13h37

Je crois avoir compris ton pb mais j'ai besoin de savoir... Donne-nous un exemple de la totalité de ce que tu colles dans l'une des cellule qui ne vont pas.
A+