Redimensionner une cellule en VBA

[WyLLoU]

KiKoO !! je cherche a faire redimensionner la largeur d'une cellule selon le bouton sur lequel j'appuis(c'est pas le bouton le plus important)
Je sais pas du tout comment faire,ça doit etre possible jpense non??

 

[WyLLoU]

en fait c'est bien entendu la largeur de la colonne que je veux redimensionner ,excusez moi dsl :ermm:

 

[PascalXLD]

Bonjour

si c'est la largeur de ta cellule active cela donne ceci

Columns(ActiveCell.Column).ColumnWidth = 12.29 ' voir pour la valeur à adapter

Bon courage

 

[WyLLoU]

En fait non,c'est des colonnes que je veux choisir

mais j'ai trouvé ça

Worksheets('Feuil1').Columns('A:I').AutoFit

sur un nouveau fichier ça marche mais sur le mieu ça met erreur,je me demande si c'est pas un problème du fait que mes colonnes ont des formats différents!!!???§

 

[WyLLoU]

Erreur d'execution '1004':

La méthode AutoFit de la classe Rangea échoué.



Mais ça me dit pas pourquoi ça plante

:unsure:

 

[PascalXLD]

Re

Peux-tu joindre le fichier STP ce ser aplus facile

 

[WyLLoU]

Bin non je peux pas y'a des infos confidentiel dessus :ermm:

 

[PascalXLD]

Re

Si tu retires tes données ou tu en mets des bidons

 

[WyLLoU]

Bin ça va buggué parce que j'ai une méthode ADO OLEDB pour récupérer mes données.