Sujet Précédent Sujet Suivant

Largeur des colonnes dans excel

Résolu/Fermé
sozanita20 Messages postés 2 Date d'inscription vendredi 8 mai 2009 Statut Membre Dernière intervention 8 mai 2009 - 8 mai 2009 à 11:08
Mike-31 Messages postés 18318 Date d'inscription dimanche 17 février 2008 Statut Contributeur Dernière intervention 26 avril 2024 - 8 mai 2009 à 13:02
Bonjour,

je veux faire une macro qui change ma largeur des colonnes en fonction du texte qui contienne,.
j'ai arrivé à créer une qui joue sur la largeur d'une colonne, mais je sais pas comment faire pour qu'elle joue sur les autres colonnes de la feuille.
voici le code que j'ai programmé:

Dim compteur As Integer
Dim nbrcar As Integer
nbrcar = 0
For i = 1 To 200
If Len(Range("A" & i)) > nbrcar Then
nbrcar = Len(Range("A" & i))
End If

Next i
Columns("A").ColumnWidth = nbrcar



merci d'avance
Cordialement
A voir également:

4 réponses

Réponse 1 / 4
sozanita20 Messages postés 2 Date d'inscription vendredi 8 mai 2009 Statut Membre Dernière intervention 8 mai 2009
8 mai 2009 à 11:26
bonjour,

merci m@rina , votre macro a répondu à ma question.


merci une autre fois
Cordialement
0
Réponse 2 / 4
Mike-31 Messages postés 18318 Date d'inscription dimanche 17 février 2008 Statut Contributeur Dernière intervention 26 avril 2024 5 078
8 mai 2009 à 13:02
Re,

J'avais oublié le lien

http://www.commentcamarche.net/forum/affich 12347472 largeur d une collonne?#6

Ou mieux le lien direct pour récupérer le fichier

https://www.cjoint.com/?fjiwKMIKcY

A+--


Un problème sans solution est un problème mal posé  (Einstein)
0
Réponse 3 / 4
m@rina Messages postés 20175 Date d'inscription mardi 12 juin 2007 Statut Contributeur Dernière intervention 7 mai 2024 11 279
8 mai 2009 à 11:15
Bonjour,

La méthode AutoFit devrait te suffire, non ? 

Sub ajuste()
Range("A1:Z50").Columns.AutoFit
End Sub


m@rina
-1
Réponse 4 / 4
Mike-31 Messages postés 18318 Date d'inscription dimanche 17 février 2008 Statut Contributeur Dernière intervention 26 avril 2024 5 078
8 mai 2009 à 11:16
Salut,

Regardes cette discussion d'hier, ou j'ai joint un modéle post 3

A+

Un problème sans solution est un problème mal posé  (Einstein)
-1

Discussions similaires

Dimensions L x l x H : comment lire ces infos ?
Miss-Curieuse -
valou -

8 réponses