merci "lolo" a écrit dans le message de news: 42107b93$0$354$
Bonjour a tous
J'aurais voulu savoir comment faire pour que les colonnes s'ajustent automatiquement au cas ou on saisie un chiffre trop long Merci
Laurent
papou
Bonjour C'est la flemme de le faire manuellement ? ;-) Sinon vite fait quelque chose comme ça : (Dans le code de la feuille : clic droit sur l'onglet, Visualiser le code) Private Sub Worksheet_Change(ByVal Target As Range) If Target.Value <> "" Then Columns(Target.Column).AutoFit End Sub Cordialement Pascal
"lolo" a écrit dans le message de news:42107b93$0$354$
Bonjour a tous
J'aurais voulu savoir comment faire pour que les colonnes s'ajustent automatiquement au cas ou on saisie un chiffre trop long Merci
Laurent
Bonjour
C'est la flemme de le faire manuellement ? ;-)
Sinon vite fait quelque chose comme ça :
(Dans le code de la feuille : clic droit sur l'onglet, Visualiser le code)
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Value <> "" Then Columns(Target.Column).AutoFit
End Sub
Cordialement
Pascal
"lolo" <annaig.laurent@free.fr> a écrit dans le message de
news:42107b93$0$354$626a14ce@news.free.fr...
Bonjour a tous
J'aurais voulu savoir comment faire pour que les colonnes s'ajustent
automatiquement au cas ou on saisie un chiffre trop long
Merci
Bonjour C'est la flemme de le faire manuellement ? ;-) Sinon vite fait quelque chose comme ça : (Dans le code de la feuille : clic droit sur l'onglet, Visualiser le code) Private Sub Worksheet_Change(ByVal Target As Range) If Target.Value <> "" Then Columns(Target.Column).AutoFit End Sub Cordialement Pascal
"lolo" a écrit dans le message de news:42107b93$0$354$
Bonjour a tous
J'aurais voulu savoir comment faire pour que les colonnes s'ajustent automatiquement au cas ou on saisie un chiffre trop long Merci
Laurent
Daniel
Bonjour. Essaie le code suivant : Private Sub Worksheet_Change(ByVal Target As Range) Target.EntireColumn.AutoFit If Target.ColumnWidth < 10.71 Then Target.ColumnWidth = 10.71 End If End Sub Cordialement. Daniel "lolo" a écrit dans le message de news: 42107b93$0$354$
Bonjour a tous
J'aurais voulu savoir comment faire pour que les colonnes s'ajustent automatiquement au cas ou on saisie un chiffre trop long Merci
Laurent
Bonjour.
Essaie le code suivant :
Private Sub Worksheet_Change(ByVal Target As Range)
Target.EntireColumn.AutoFit
If Target.ColumnWidth < 10.71 Then
Target.ColumnWidth = 10.71
End If
End Sub
Cordialement.
Daniel
"lolo" <annaig.laurent@free.fr> a écrit dans le message de news:
42107b93$0$354$626a14ce@news.free.fr...
Bonjour a tous
J'aurais voulu savoir comment faire pour que les colonnes s'ajustent
automatiquement au cas ou on saisie un chiffre trop long
Merci
Bonjour. Essaie le code suivant : Private Sub Worksheet_Change(ByVal Target As Range) Target.EntireColumn.AutoFit If Target.ColumnWidth < 10.71 Then Target.ColumnWidth = 10.71 End If End Sub Cordialement. Daniel "lolo" a écrit dans le message de news: 42107b93$0$354$
Bonjour a tous
J'aurais voulu savoir comment faire pour que les colonnes s'ajustent automatiquement au cas ou on saisie un chiffre trop long Merci
