VBA-TRIER CHIFFRE incluant des CHIFFRES AVEC UNE LETTRE

[Celeda]

Bonjour,

Je suis à la recherche d'une macro qui me trierait des chiffres et des chiffres qui terminent par une lettre.
Excel trie d'abord les chiffres et ensuite place les chiffres avec une lettre à la fin et cela ne m'arrange pas du tout. Et en plus je souhaiterais que tout soit aligné à droite.
Pouvez-vous m'aider, svp.

Voici de quoi il en retourne :

ETAPE 1 - recup chiffres
114
20B
6
150
30A


ETAPE2 -Liste après tri
6
114
150
20B
30A

ETAPE3 - voilà ce que j'aimerais obtenir comme tri.
6
20B
30A
114
150

Merci à l'avance.

 

[Paritec]

Re : VBA-TRIER CHIFFRE inclusant des CHIFFRES AVEC UNE LETTRE

Bonjour Celeda le forum
pas le temps là mais je vais y regarder de tout prêt
a+
papou

 

[piga25]

Re : VBA-TRIER CHIFFRE inclusant des CHIFFRES AVEC UNE LETTRE

Bonjour CELEDA

Une piste peut être dans le post de notre ami BOISGONTIER ici

 

[MichD]

Re : VBA-TRIER CHIFFRE inclusant des CHIFFRES AVEC UNE LETTRE

Bonjour,

Suppose que tes données sont en colonne D1x
en colonne E, tu copies cette formule : =SI(ESTNUM(DROITE(D1;1)*1);D1;GAUCHE(D1;NBCAR(D1)-1))*1
Tu sélectionnes les colonnes D1:Ex et tu tries sur la colonne E, et tu effaces le contenu de la colonne E

 

[pierrejean]

Re : VBA-TRIER CHIFFRE inclusant des CHIFFRES AVEC UNE LETTRE

Bonjour Celeda et bises

Vois si cela te convient

 

[Celeda]

Re : VBA-TRIER CHIFFRE inclusant des CHIFFRES AVEC UNE LETTRE

Bonjour,


Oulhala !! merci à vous tous!!

Super Pierrejean la macro et merci beaucoup (pilepoil).

et bises aussi.

 

[BOISGONTIER]

Re : VBA-TRIER CHIFFRE inclusant des CHIFFRES AVEC UNE LETTRE

Bonjour,

http://boisgontierjacques.free.fr/fichiers/Tri/TriNumerique.xls

JB

 

[job75]

Re : VBA-TRIER CHIFFRE inclusant des CHIFFRES AVEC UNE LETTRE

Bonjour à tous,

Bon, puisque ni pierrejean ni JB n'en proposent, voici une solution par tableau (plus rapide).

Je squate honteusement le fichier de pierrejean

A+

 

[pierrejean]

Re : VBA-TRIER CHIFFRE inclusant des CHIFFRES AVEC UNE LETTRE

Re

Salut JB

Plus concis , plus elegant ...... mais

ne trie pas sur l'alpha !!

voir exemple (et ameliorer si Celeda le souhaite )

 

[job75]

Re : VBA-TRIER CHIFFRE inclusant des CHIFFRES AVEC UNE LETTRE

Re,

En faisant comme JB, c'est en effet plus simple, pas besoin d'une 2ème boucle.

Par contre j'ai besoin de faire 2 tris successifs identiques.

Pas encore compris pourquoi.

Edit : compris, c'est à cause de Header:=xlGuess ! Voir fichier (3).

A+

 

[BOISGONTIER]

Re : VBA-TRIER CHIFFRE inclusant des CHIFFRES AVEC UNE LETTRE

Bonsoir,

Voir pJ

JB

 

[pierrejean]

Re : VBA-TRIER CHIFFRE inclusant des CHIFFRES AVEC UNE LETTRE

Re
Salut ami job (et à tres bientot)
Bravo JB

Mais juste histoire de jouer le genre 'Pénible'
ne trie pas si plus d'un alpha
voir exemple

 

[job75]

Re : VBA-TRIER CHIFFRE inclusant des CHIFFRES AVEC UNE LETTRE

Re,

ne trie pas si plus d'un alpha

Oeil de lynx pierrejean pas de problème avec la mienne :

 

[BOISGONTIER]

Re : VBA-TRIER CHIFFRE inclusant des CHIFFRES AVEC UNE LETTRE

Voir PJ

JB

 

[job75]

Re : VBA-TRIER CHIFFRE inclusant des CHIFFRES AVEC UNE LETTRE

Re,

Jacques, je ne comprends pas pourquoi tu te casses la tête avec les lettres.

Un 2ème critère de tri, sur la colonne A, suffit non ?

Sub triColInter2()
  [b:b].Insert
  For Each c In Range([A2], [a65000].End(xlUp))
    c.Offset(0, 1) = Val(c)
  Next c
  With Range("A2").CurrentRegion
    .Offset(1).Resize(.Rows.Count - 1).Sort [B2], , [A2]
  End With
  [b:b].Delete
End Sub

A+