Tri automatique... Je craque

Bonjour le Forum,

Je suis gestionnaire de Parc Informatique et je travaille actuellement à trouver un moyen de simplifier les recherches, le moyen le plus abouti que j'ai trouvé a été dans la concrétisation d'un fichier de réservation de materiel pour tous les techniciens informatiques, Ce fichier est en grande partie automatisé à l'aide de fonctions et de VBA.

MAIS... vu qu'il y 'a toujours un MAIS...

Je me retrouve maintenant piégé par le fait que je dois forcement entretenir ce fichier,

Et je dois actuellement, faire l'extraction d'un parc de plus de 5000 biens, pour ensuite faire un tri à l'aide de filtres auto. pour classer les biens en fonctions de leurs types etc.

Ce qui donc, devait me faire gagner du temps... m'en fait perdre...

Je souhaite (mais je n'y arrive pas)... que les PI s'affichent automatiquement sans avoir a mettre la main dans la feuille de stock... Il y'a peut-être une fonction... mais là... je suis paumé... et j'ai bien peur que c'est espoir ne soit impossible avec la version imposée de ma société : Excel2000

Je vous ai recréé un "mini-stock" pour que vous puissiez mieux comprendre...

https://www.excel-pratique.com/~files/doc2/ExempleTriStock.xls

D'avance, un ENORME Merci à ceux qui trouveront une solution à ce problème !!!

A bientot

Gunther

Bonjour Gunther,

je ne connais pas les limitations de la version 2000, mais je pense que ce qui suit devrait fonctionner :

Le principe

On va prendre l'exemple du Etat=Normal, Stock=La Defense, Type=Fixe

Tu crée une zone de critère dans la feuille stock : tu recopie tes en-têtes de colonne "a1:f1" en "i4:n4" par exemple.

En L5 tu saisie ou mieux tu copie : Normal

En M5 : La Defense

En N5 : Fixe

Tu copie le code suivant dans Module 1 du projet vba de tonfichier :

Sub TotoTest

Range("E4").Select

Application.CutCopyMode = False

Range("A1:F47").AdvancedFilter Action:=xlFilterCopy, CriteriaRange:=Range( _

"I4:N5"), CopyToRange:=Range("I7:N200"), Unique:=False

End Sub

Tu l'execute.

Si les bonnes données apparaissent en "i7:n7" c'est gagné, il ne reste "plus.. ." qu'à adapter afin de copier ces données dans ta feuille récap, et à faire varier les critères et les zones de copie pour les autres cas de figure.

Bon courage

a+

La... C'est la grande classe !!!

le peu que j'ai testé... C'est EXACTEMENT ça !!!

Merci à toi pour ce coups de main !

Bonsoir,

Je ne pouvais laisser 10 Heures de réflexion sans réponses....

Dans le fichier joint (conforme à ton fichier exemple) :

- un onglet par Site

- selon le PC (Portable ou Fixe) une zone de donnée

- selon l'état du PC, un état des lieux....

PS, le code se déclenche en cliquant sur le bouton vert (en G1)

PS2 : L'onglet "Modèle" sert, ne pas le supprimer.....

Bref, regarde.....

https://www.excel-pratique.com/~files/doc2/ExempleTriStock_v1.xls

Edit : J'avais point vu que tu avais répondu "pophop", désolé....

Mais nous avons eu la même idée (l'utilisation du filtre élaboré)

Euh, Gunther, reviens, j'ai un peu finalisé ta demande....

La... je suis sur le cul

C'est impressionnant ^^

Merci à vous 2 !!!

(maintenant reste plus qu'a adapter tout ça)

--- Après Tests ---

j'ai essayé ton code Pophop,

sur l'exemple que tu donnes le tri se fait sur la meme feuil (stock)

par contre, est-il possible de coller ces informations dans une autre feuil ?

Le peu que j'ai essayé, ça m'a retourné une "erreur 400"

ou alors quand je tente à la mano... je me récupère une erreur :

"Vous pouvez seulement copier des données filtrées vers la feuile active."

--> cousinhub

En fait, je n'ai pas que des fixes et des portables (c'était un échantillon) j'ai également des imprimantes, des ecrans etc. Mais quand j'ai fais un test un peu plus "poussé"... Je me ramasse des erreurs... exemple : des imprimantes se retrouvent dans la colonne des portables etc... et je n'arrive pas vraiment à remettre ton code d'équerre pour eviter ce genre d'erreurs... Si tu veux tester, tu as facile : tu choppes un PI et tu transformes son type, en marquant "imprimante" par exemple...

Encore Merci !

Bonjour

Une méthode par formules, sans macro, sans copier-coller, sans aucune manip...

La seule contrainte est de prévoir des tableaux suffisamment grands pour contenir le nombre de données.

Une cellule donnant le nombre de résultats à trouver, il serait facile avec une MFC de mettre une alarme visuelle au cas ou le nombre de lignes serait insuffisant.

https://www.excel-pratique.com/~files/doc2/TriStock_Formules.xls

Cordialement

8) 8) 8)

La c'est encore plus nickel !!! Merci à toi ^^

mais peux-tu me traduire cette fonction ?

histoire de pouvoir/savoir la réutiliser ?

{=SI(ESTERREUR(INDEX(INDIRECT("Stock!$A$"&D7&":$A$48");EQUIV(1;(INDIRECT("Stock!$E$"&D7&":$E$48")=$B$2)*(INDIRECT("Stock!$F$"&D7&":$F$48")=$A$5)*(INDIRECT("Stock!$D$"&D7&":$D$48")=$A$6);0)));"";INDEX(INDIRECT("Stock!$A$"&D7&":$A$48");EQUIV(1;(INDIRECT("Stock!$E$"&D7&":$E$48")=$B$2)*(INDIRECT("Stock!$F$"&D7&":$F$48")=$A$5)*(INDIRECT("Stock!$D$"&D7&":$D$48")=$A$6);0)))}

Ce code est visible quand tu es sur la cellule A8 de ton fichier !

De retour :

Je viens de faire un essai !!!

mon fichier vient, grace tout ça, de se faire une sérieuse... cure d'amaigrissement !!!

Merci à vous 3 !!!

Tous mes remerciements !

Gunther

Bonjour Gunther

Je te laisse un peu cogiter sur la formule matricielle en question. Dèjà pas facile à élaborer, mais encore plus difficile à expliquer (Long...très long..)

Je reviendrai si tu n'arrives pas à la comprendre.

cordialement

Rechercher des sujets similaires à "tri automatique craque"