FOUQUET Yves
XLDnaute Occasionnel
Bonjour,
Je travaille sur un vieux tableau EXCEL contenant une colonne E avec "l'année de cotisation".
Je veux trier la feuille en VBA par année de cotisation.
Pour cela dans le code, je transforme d'abord l'année en nombre puis je fais le trie et j'affiche.
Cela ne marche pas car toutes les données de la colonne E ne sont pas des nombres et malgré ma transformation, rien à faire!!
HELP
Merci de votre aide.
Je travaille sur un vieux tableau EXCEL contenant une colonne E avec "l'année de cotisation".
Je veux trier la feuille en VBA par année de cotisation.
Pour cela dans le code, je transforme d'abord l'année en nombre puis je fais le trie et j'affiche.
Cela ne marche pas car toutes les données de la colonne E ne sont pas des nombres et malgré ma transformation, rien à faire!!
HELP
Merci de votre aide.
VB:
If UserForm53.le_choix = 3 Then
Application.DisplayAlerts = False
' --------- trier par COTISATION colonne E ----------
With Sheets("Effectif")
Columns("E:E").NumberFormat = "General" 'transforme la colonne en NOMBRE
.[A:O].Sort .[E1], xlAscending, Header:=xlYes
End With
Application.DisplayAlerts = True
'---------------------------- affiche la liste triée
Set Ws = Sheets("Effectif")
With Sheets("Effectif")
Set Rng = .Range("A2:O" & Ws.[B60000].End(xlUp).Row)
End With
ListBox1.ColumnCount = 13
ListBox1.ColumnWidths = "25;120;120;65;40;50;300;40;130;180;65;15;200;"
ListBox1.RowSource = Rng.Address(external:=True)
TextBox1 = Rng.Rows.Count
End If