Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

largeur colonne suivant donnée

onyx41

XLDnaute Junior
bonjour à tous le forum,

J'ai trouvé sur le forum la façon de modifier la largeur de colonne suivant les données inscrites dans la ligne A2:AB2. Très bien, mais je n'arrive pas à l'adapter à mon cas. Je ne souhaiterais élargir seulement la colonne qui contient les données voulues, en sachant qu'elles ne seront jamais dans les mêmes colonnes et laisser les autres à une largeur désirée.

ce que j'ai trouvé :

For Each Target In Range("A2:AB2")
If Target.Value = "Nom" Or Target.Value = "Objet" Then
Target.ColumnWidth = 8
Else
Target.ColumnWidth = 15
End If
Next

Merci à ceux qui voudront bien se pencher sur mon problème.
 

Hulk

XLDnaute Barbatruc
Re : largeur colonne suivant donnée

Slt Onyx, Forum,

Je suppose que tu connais, mais tu peux aussi faire comme ça...
Code:
For Each Target In Range("A2:AB2")
If Target.Value = "Nom" Or Target.Value = "Objet" Then
[B][COLOR="Green"]Target.EntireColumn.AutoFit[/COLOR][/B]
Else
Target.ColumnWidth = 15
End If
Next
De cette façon, les colonnes s'ajusteront automatiquement.

Cdt, Hulk.
 

Discussions similaires

Réponses
14
Affichages
392
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…