Tri et classement

[Harold]

Bonjour,

Dans un de mes fichiers, j'ai des films avec les réalisateurs correspondant à coté. sur une autre feuille j'aurai voulu pouvoir répertorier tous ces réalisateurs et les classer par ordre alphabétique, mais je bloque, je n'y arrive pas, j'ai essayé de créer des formules matricielles mais étant plus que novice dans ce domaine, c'est infaisable pour moi.

Je vous joint un fichier qui sera peut être plus clair

Merci de vos réponses

 

[Hervé]

Re : Tri et classement

bonjour

En attendant les formulistes, une proposition possible en vba.

salut

 

[Harold]

Merci Hervé,

Est-ce que le code je peux l'intégrer à une Usf, qui enregistre les données que je lui indique?
Usf pas encore faite sur le nouveau fichier (code d'un autre fichier)
Userform dont le code serait le suivant:
Private Sub Valider_Click()

Num = Sheets("Plan").Range("C2000").End(xlUp).Row + 1
Sheets("Plan").Activate
Range("A" & Num).Value = Compte
Range("C" & Num).Value = Intitulé_Compte

Sheets("Plan").Select
Cells.Select
Selection.Sort Key1:=Range("B1"), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
Range("A1").Select
Sheets("Recherche").Select

Unload Insert
End Sub

Merci

 

[Harold]

Si quelqu'un à une formule à intégrer, je suis tout de même preneur.

je voudrais essayer les deux formules et VBA, et voir laquelle est la plus pratique

Merci d'avance

 

[Hervé]

Re : Tri et classement

re

a mon avis (mais bon, j'ai pas la science infuse) si tu commences en VBA, tu as interet à continuer dans ce sens.

vba et formule ne font pas toujours bon ménage.

j'ai pas bien compris ta demande concernant l'userform, pourrais-tu etre plus précis ?

enfin, j'ai corrigé ton code, ca fera moins sapin de noel 🙂

With Sheets("Plan")
Num = .Range("C65536").End(xlUp).Row + 1
.Range("A" & Num).Value = Compte
.Range("C" & Num).Value = Intitulé_Compte
.Cells.Sort Key1:=.Range("B1"), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
End With
Unload Insert

salut

 

[Monique]

Re : Tri et classement

Bonjour,

Au choix :
sans formule matricielle mais avec une colonne supp
avec formule matricielle, sans colonne supp mais recalcul lent
la même formule mais nommée (moins lent)
la même formule nommée mais format conditionnel au lieu de formule conditionnelle

 

[Harold]

Bonjour Monique,

Que de choix, woua, merci beaucoup, c'est exactement ce que j'attendais, pour la rapidité, c'est pas encore trop grave, je lui demande pas de courrir le 100m en 5 sec, donc ne t'inquiète vraiement pas pour ça.

Merci à toi, Monique, comme toujours tu vises juste
Et merci aussi à Hervé, sa solution pourra me servir également

Encore un grand merci à vous deux

à +