Scanner des codes barres

Oui, j'ai pris la V3. Essaie d'introduire à la main une valeur dans la colonne A ...

Je suis sur le coup...

Je comprend pas avant de publier j'ai testé ça marchait bien pourquoi ça fait ça

meme en modifiant le code avec: Order:=xlDescending

le problème reste inchangé je ne comprend pas..

as-tu vu les espaces dans la colonne E ?

efface les valeurs même s'il te semble qu'il n'y a rien !!

J'ai testé de fond en comble a priori cette version marche ??? enfin.. j'espère..

Lolo le breton, Ton fichier descendrai à combien de lignes max en moyenne ? plutot 500 ou plutot 50000 ?

oui j'ai pris la V3 et a l'ouverture il me dit qu'il y a un probleme qu'il repare??????

j'ai mis en texte A et C et tjrs pareil

Excel doit modifié quelque chose quand il "répare" le classeur.. ce qui crée la malfonction...

Quand je test chez moi la V3 et V4 fonctionne parfaitement sans toucher au format de cellules

Je seche la je ne sais pas trop comment résoudre le prob...

lolo Le Breton a écrit :

j'ai mis en texte A et C et tjrs pareil

C'est-à-dire ... "tjrs pareil" ??

@gabin ... as-tu vu mon mp ?

@Lolo, peux-tu essayer cette version (celle de Gabin légèrement remaniée)

désolé du décalage je viens d'essayer la V4 et ca tourne ca classe

c'est parfait

dernier point est il possible d'avoir 6 feuilles pareil dans le classeur de façon a trier mes différentes taille de boite

et pour le nombre de scan on part sur 1500 par feuille sinon je remets a zero

oui c'est tout bon en fonctionnement plus de bug par contre quand je reinitialise la feuille il me reste les valeurs en E et F

par contre je viens de voir que si je supprime un scan il ne decremente pas la valeur ds les quantitées

Bonjour

pour faire suite a une suppression de scan ca ne modifie pas la quantité mais ca ajoute une nouvelle ligne en quantité qui n'est affectée a rien incrémenté de 1et au prochain scan il mets une ref devant ce chiffre et incremente de 1 du coup pour une nouvelle ref en scan j'ai quantitée 2.

c'est un peu confus l'explication du coup je colle des exemples

on retrouve bien la valeur 1suite a suppression d'un scan colonne A

la j'ai scanner une nouvelle réf. 725396 et on retrouve bien la réf. mais déjà a 2 car elle a pris la place devant le 1 tout seul

Et voila la V5 !

A+

tout ca c'est parfait

gain de temps appréciable

un grand merci a toi et a Steelson

au top

Merci du retour,

C'ets toujours un plaisir d'aider, cela me permet de progresser en VBA donc c'est gagnant gagnant !

Merci Steelson pour le gros coup de pouce aussi

A+

Un complément ... si c'est toujours d'actualité !

lolo Le Breton a écrit :

je viens de voir que si je supprime un scan il ne decremente pas la valeur ds les quantitées

pour ce point, modifie la ligne suivante

Cells(n, 6) = Cells(n, 6) + 1

comme suit :

Cells(n, 6).FormulaR1C1 = "=IF(RC[-1]="""","""",COUNTIF(C[-4],RC[-1]))"

Steelson j'avais corrigé ce problème dans la V5 en ajoutant la condition:

if len(cell) > 1 then

Visiblement, les scans ne donneront jamais de nombre inférieur à 10

Faire simple est complexe, faire complexe est simple !

Faire simple est.... simple ?

Gabin, oui bonne idée

Maintenant si on veut que cela décompte en cas d'effacement d'un code-barre, il faut y mettre la formule.