Problème avec Rows.AutoFit

Bonjour,

Lorsque j'execute dans le fichier ci-joint:

Private Sub Bouton1_Cliquer()

Rows.AutoFit

End Sub

Il n'y a q'une colonne qui se met à jour, les autres cellules avec du texte ne s'adaptent pas. or j'ai besoin que toute la feuille s'actualise. Avez-vous une idée pour le code manquant svp?

merci beaucoup!

Alain

Alaindeg a écrit :

Bonjour,

Lorsque j'execute dans le fichier ci-joint:

Private Sub Bouton1_Cliquer()

Rows.AutoFit

End Sub

Il n'y a q'unecolonnequi se met à jour, les autres cellules avec du texte ne s'adaptent pas. or j'ai besoin que toute la feuille s'actualise. Avez-vous une idée pour le code manquant svp?

merci beaucoup!

Alain

Tu ne vois pas une contradiction ?

A oui effectivement

Sais-tu quel est le terme à utiliser? J'ai essayé Sheet mais c'est pas cohérent et forcément cela ne fonctionne pas.

Alors j'avance avec Private Sub Bouton1_Cliquer()

Range("A:AG").AutoFit

End Sub

Le problème est que cela élargit les cellules au lieu de les agrandir en hauteur...

Bonjour,

Essaye ça :

Cells.Autofit

Columns ! Ah !?

C'est quoi que tu ajustes les lignes ou les colonnes

Si c'est les lignes :

ActiveSheet.UsedRange.Rows.Autofit

Si colonnes ti remplaces Rows par Columns.

Autofit n'agrandit pas ! Il ajuste soit agrandit ou rétrécit, ligne par ligne selon contenu...

Merci pour toutes vos réponses!

j'ai tout tenté et ce qui s'approche le plus c'est ActiveSheet.UsedRange.Columns.Autofit

en revanche, cela ne modifier qu'une colonne sur les trois qui sont concernées. Bizarre..

Quand tu utilises Autofit, tu laisses Excel décider... !

Le résultat n'est pas parfois ce qu'on en attend.

Bonjour,

merci pour votre aide! je vais utiliser Rows.AutoFit et ajuster à la main si besoin.

Alain