Trie alphabetique sous excel

Résolu
saturnin -  
Bonjour,
Un de mes tableaux Excel est disposé comme ça :
SEVEN
13/12/90 très bon
Drame à voir....
xxxxxx
yyyy
LE DIVAN
15/07/10
Mélo nul
zzzzz
ooooo
etc ..... je voudrais trier ce tableau par ordre alphabétique (le DIVAN. puis SEVEN etc...) quelqu'un peut il m'aider ???? le tableau comporte 1300 films en désordre !!! ce n'est pas des colonnes que je veux trier mes des lignes.
Je suis sous Excel 2007.
Merci beaucoup à tous

4 réponses

  1.  tchernosplif
    Bonjour,

    En exploitant le fait qu'une date commence par 0,1,2 ou 3, vous devriez pouvoir "détecter" les lignes avec les dates. (sinon recherche des / )

    A partir de la là, vous pourrez détecter les lignes avec les titres (1 cran au dessus)

    Attribuer un numéro à chaque titre (de 10 en 10) puis Faire le tri.

    ces numéros serviront à récupérer les infos via un RECHERCHEH.

    Envoyez moi votre fichier via cijoint.fr si vous ne comprenez pas.
    (j'avoue avoir du mal à comprendre en me relisant^^)
    1
    1. Utilisateur anonyme
      Bonjour

      J'ai regardé ton exemple, si les conditions sont bien 5 lignes pour définir un film, tu peux mettre cette macro.

      Sub trieFilm()
      Dim nbcellsY As Integer
      nbcellsY = Application.WorksheetFunction.CountA(Feuil1.Range("$A:$A"))
      For i = 1 To nbcellsY Step 5

      Cells(i, 2) = Cells(i, 1) & "0":
      For j = 1 To 4
      Cells(i + j, 2) = Cells(i, 1) & j
      Next j

      Next i
      End Sub

      Principe de fonctionnement, elle prend le nom du film, met dans la colonne B1 seven0, b2 seven1, b3 seven2,b4 seven3,b5 seven4 puis b5 divan0, etc..
      tu tries ensuite par rapport à la colonne B et tu effaces la colonne B.

      Désolé pour les inconditionnels des formules, il y a certainement la possibilité de faire la même chose avec une formule en B. Je ne les maîtrise pas encore.
      Cordialement

      agi67
      0
      1. eriiic Contributeur
        Bonsoir,

        Un remix des 2...
        Avec des titres de colonne en ligne 1, tes données qui commencent en B2 mettre en A2:
        =SI(ESTNUM(GAUCHE(B3;8)*1);B2&"_0";GAUCHE(A1;NBCAR(A1)-1)&DROITE(A1;1)+1)
        à recopier jusqu'en bas.
        Par sécurité copier/collage spécial valeur de la colonne A
        Trier sur la colonne A

        eric
        0
        1. saturnin Auteur
          MERCI à TOUS la solution était là !! BRAVO
          0