Discussion :

[phil6969]

Bonjour,

je cherche à réaliser un tris personnalisé sur les colonnes B (de A à Z), C (de A à Z), D (de A à Z), et F (du plus petit au plus grand).(pour info j'ai encore 66 colonnes après).
Mon problème est que dans la colonne D chaque cellules possèdent des lettres et nombres et à cause des nombres le tris n'est pas bon.
Je m'explique au lieu d'avoir un tri par exemple 10,12,25,28,120,200,235, on va avoir 10,12,120,200,235,25,28.
Je voudrais donc dans la colonne D, réaliser le tris que sur les, par exemple 10 premiers caractères qui ne sont que des lettres.
J'ai trouvé cette macro et essai de la modifiée pour mon application sans résultat.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
Sub Macro1()
Dim Lg%
    Lg = Range("b65536").End(xlUp).Row
    Application.ScreenUpdating = False
    Application.CutCopyMode = False
    Columns(3).Insert
    Range(Cells(2, 3), Cells(Lg, 3)) = "=MID(RC[-1],1,2)"
    Range(Cells(2, 1), Cells(Lg, 10)).Sort Key1:=Range("c2"), Order1:=xlAscending, Key2:=Range("A2") _
    , Order2:=xlAscending, Header:=xlNo, OrderCustom:=1, MatchCase:= _
    False, Orientation:=xlTopToBottom
    Columns(3).Delete
End Sub

Pouvez vous me venir en aide ?

Merci par avance.

[unparia]

Bonjour
Essaye d'ajouter une colonne après la colonne D, puis d'utiliser la méthode Range.texttocolumns -option longueur fixe - pour "éclater" en deux colonnes la colonne D (qui contiendra les 10 premiers caractères, la colonne suivante contenant les autres caractères), puis de trier.
L'utilisation de l'enregistreur de macros te permettra de connaître l'essentiel du code à écrire pour y parvenir dynamiquement.
Gestes à faire : menu ---> Donnée --->> Convertir (et choisir "largeur fixe")

[phil6969]

Bonjour et merci Unparia pour ton aide.

J'arrive a faire ce que tu m'as indiqué.
C'est parfait.

Mon soucis c'est de pouvoir ensuite recoller les 2 colonnes pour n'en former plus qu'une et la je n'ai trouvé aucune option dans excel pour réaliser cette action et l'enregistrer en macro ..

[Philippe Tulliez]

Bonjour,

ensuite recoller les 2 colonnes pour n'en former plus qu'une et la je n'ai trouvé aucune option dans excel pour réaliser cette action et l'enregistrer en macro

En concaténant les deux cellules et ensuite en passant par un Copier/Collage Special-Valeur
Exemple

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

=A2 & " " & B2

[unparia]

Ou tout simplement :
- ajouter deux colonnes après la colonne D
- copier la colonne D en nouvelle colonne E
- éclater la E en E et F comme vu précédemment
- trier comme on l'entend
- supprimer les colonnes E et F
Le tout : facilement réalisable dans cet ordre par code.

[phil6969]

Bonjour,

Merci à vous deux.

Problème résolu.

Bonne journée.