tri de valeur alphanumérique.

  • Initiateur de la discussion Initiateur de la discussion sasjm37
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

sasjm37

XLDnaute Junior
Bonjour le forum,
je cherche le moyen de faire un tri de données alphanumérique dans l'ordre 1, 1a, 2, 3, 3a, 4, 10, 10a, 20, 30 ... et évidement il se fait sous la forme 1, 10, 1a, 10a, 2, 20, 3, ,30, 3a, 4. J'enrage Grrrrrrr, car ce doit-être assez simple et je ne trouve pas.
merci de votre aide
 

Pièces jointes

Re : tri de valeur alphanumérique.

Bonjour,

Il me semble que ce n'est pas possible.

La logique voudrait que 15/2008 (C7) viennent se placer en C10, après 11b/2008 et avant 20/2008.

Essaie en triant sur une colonne supplémentaire contenant la formule :
=TEXTE(GAUCHE(A3;NBCAR(A3)-5);"000")

abcd
 
Re : tri de valeur alphanumérique.

Bonjour,

Excel fait bien un tri alphanumérique (le numérique étant plus petit que l'alphabétique)

Il faut donc normaliser ta codification par exemple

2 numériques suivi d'un alpha suivi d'un / suivi de l'année

STAGE

03 /2008
03a/2008
05 /2008
06 /2008
11 /2008
11a/2008
11b/2008
15 /2008
20 /2008

la machine n'interprete pas les chiffres

Salut

GIBI
 
Re : tri de valeur alphanumérique.

Bonsoir,

Code:
Sub TriNumérique()
  [b:b].Insert
  For Each c In Range([A3], [a65000].End(xlUp))
    temp = Split(c, "/")(0)
    c.Offset(0, 1) = Val(temp)
    If Asc(Right(temp, 1)) > 95 Then
       c.Offset(0, 1) = c.Offset(0, 1) + Asc(Right(temp, 1)) / 1000
    End If
  Next c
  Range("A3").CurrentRegion.Select
  Selection.Sort Key1:=[B2]
  [b:b].Delete
End Sub

JB
Formation Excel VBA JB
 

Pièces jointes

Re (résolu) : tri de valeur alphanumérique.

bonjour,
abcd: ton idée n'est pas concluante mais merci de ton aide.
GIBI: je n'ai pas testé la tienne car BOISGONTIER vient de me fournir une macro du feu de D..., merci.
BOISGONTIER je n'ai pas encore tout compris dans ta procédure qui est formidable, merci beaucoup, je vais m'en servir de ce pas (à pas) et l'étudier.
Merci à tous.
sasjm37
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
9
Affichages
502
Réponses
5
Affichages
428
Retour