Macro en boucle et tri automatique (v2k)

[Gunther]

Bonjour tout le monde !

Je suis en train de faire un fichier d'entrées et de sorties pour des techniciens informatiques.

Ce que je souhaite faire, c'est un fichier pour lequel ils n'aient aucunement besoin d'utiliser un clavier (uniquement une douchette et des codes barres)

j'vais essayé d'être le plus clair :

un technicien s'identifie (ex: "gc0231em") en D6
puis il note le code du materiel en D8
ensuite le dossier en D10
et enfin il lance la macro en flashant le code barre "ENTREE" ou "SORTIE"

Après avoir noté ENTREE, les infos sont collées dans le tableau juste en dessous.

sauf que mon combo de lancement de la macro par le texte "ENTREE" / "SORTIE" et la macro en elle même, déconne...

au lieu d'ajouter une ligne dans la liste du dessous, la macro part en boucle ~200x

Ca c'est mon problème principal...

Maintenant (et là, votre réponse est facultative ^^)

Je souhaiterai, (en lançant une autre macro), trier tous les biens entrants et sortants de la liste dans 2 onglets différents juste par l'action d'une macro...

Dans l'attente de vous lire,

Merci d'avance

Gunther

 

[phlaurent55]

Re : Macro en boucle et tri automatique (v2k)

Bonjur Gunther,

vu dans ton code:

If .Range("D12").Value = ("ENTREE") Then Call Ajout
If .Range("D12").Value = ("SORTIE") Then Call Ajout

il ne me semble pas très logique d'utiliser la même procédure (Call Ajout) pour des valeurs diamétralement opposées dans un même cellule ( D12)

cela demande éclaircissement

à+
Philippe