1. Accueil
  2. Forum Codes-Sources
  3. Visual Basic
  4. Visual Basic 6
Sujet Précédent Sujet Suivant

Redimensionner la largeur de colonne

Résolu
ipsalien Messages postés 2 Date d'inscription vendredi 5 février 2010 Statut Membre Dernière intervention 1 mars 2010 - 1 mars 2010 à 02:31
ipsalien Messages postés 2 Date d'inscription vendredi 5 février 2010 Statut Membre Dernière intervention 1 mars 2010 - 1 mars 2010 à 09:42
Bonjour,

J'affiche sur une feuille Excel un tableau au moyen d'un "banal" Workbooks("aa.xls").Worksheets("Feuille1").cells(1,1).value.
Je souhaite que la largeur de la colonne soit automatiquement celle de la chaîne de caractère que j'inscris dedans.
Comment faire car la codage ColumnWidth attends une valeur en brouette voir en pixel mais surement pas en nombre de caractère...

Si quelqu'un à une idée !

2 réponses

Réponse 1 / 2
Calade Messages postés 1207 Date d'inscription dimanche 20 avril 2003 Statut Membre Dernière intervention 4 juin 2016 10
1 mars 2010 à 08:55
Bonjour,

Exécute un redimensionnement auto sous l'enregistreur de macro et ensuite tu pourras copier le code ainsi généré dans l'évènement d'ouverture de ta feuille en l'adaptant si besoin.


Calade
3
Réponse 2 / 2
ipsalien Messages postés 2 Date d'inscription vendredi 5 février 2010 Statut Membre Dernière intervention 1 mars 2010
1 mars 2010 à 09:42
Cela faisait 3j que je ramais pour trouver cette p... de fonction donc la voici attention roulement de tambour c'est "Autofit" Tadaa.
Merci Calade.

Bon un peu plus :
deux choix s'offre t'à vous :

option 1 :
Workbooks("test.xls").Worksheets("Feuille1").Columns("A:C").EntireColumn.AutoFit

option 2
Workbooks("test.xls").Worksheets("Feuille1").Columns("A:C").Select
Selection.ColumnWidth = 20.33

Voili voila
0
Rejoignez-nous