Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Macro en boucle et tri automatique (v2k)

Gunther

XLDnaute Nouveau
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
 

Pièces jointes

  • TEST.zip
    15.2 KB · Affichages: 18
  • TEST.zip
    15.2 KB · Affichages: 23
  • TEST.zip
    15.2 KB · Affichages: 22

phlaurent55

Nous a quittés en 2020
Repose en paix
Re : Macro en boucle et tri automatique (v2k)

Bonjur Gunther,

vu dans ton code:
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
 

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…