La méthode "Find" n'est pas très rapide mais en plus ici la feuille "Plan" est très tarabiscotée.
Si l'on efface tous ses formats la macro s'exécute chez moi en 1,3 seconde.
Bonsoir Job75 et bonsoir mapomme,
Je suis bien d'accord... L'organisation des rayons de mon Leclerc est digne du père UBU (ne l'oublions pas, Alfred Jarry était mayennais comme moi je le suis devenu) et puis j'aime bien la couleur
Ma logique est simple :
- je suis une personne à mobilité réduite donc je limite mes trajets lorsque je fais mes courses (même si mon toubib n'est pas d'accord)
- j'ai organisé ma cueillette du bas à droite (entrée du magasin) pour ensuite remonter sur ce côté droit, me rabattre vers la gauche, redescendre et enfin accéder aux caisses.
- j'évite ainsi les achats compulsifs (bof) et surtout les allers et retours dans le magasin
Vous m'avez envoyé un fichier très intéressant que j'ai complété lors de mon Post#19 (EssaiXYbis)
Il apparaissait que l'on devait faire un choix entre alphanumérique ou numérique au sens strict puisqu'on ne pouvait sélectionner des cellules alphanumériques comprenant des chiffres.
Je me suis dit (sans doute bêtement) qu'il suffisait de remplacer les valeurs alphanumériques de mes champs de localisation dans la feuille "plan" (fichier Courses déf joint) par des nombres pour pouvoir exécuter la macro "grouper" de "EssaiXYbis". Sur ce fichier, cette macro fonctionne super vite, d'où mon idée de la transposer dans mon fichier courses.
Problème : L'alphabet comporte 26 lettres ce qui implique une numérotation à 5 chiffres pour conserver une logique de rayon et pouvoir compléter le plan qui est loin d'être finalisé.
Exemple : Habillage -> Rayon et rien d'autre alors qu'il y a au moins 10 déclinaisons à ajouter (chaussures, accessoires, slips, homme, femme...). Dans ce cas précis, V00 deviendrait 22000 (22 pour V).
Mais pourquoi 5 chiffres ? Pour me laisser la possibilité d'insérer et d'intercaler dans une travée ou une zone une référence supplémentaire sans pour autant perturber la logique de cueillette et de cheminement. C'est ainsi que l'on retrouve dans ma "Listes" des références telles que :
B342 qui deviendrait
2342 ou
M049 qui deviendrait
13049.
La liste ou table "Plan_magasin" ne contiendrait plus alors que des des cellules alphanumériques (ex : "Cocottes Yaourtières"; "PARFUMERIE") qui seraient épargnées par la macro " grouper" ou des cellules numériques au sens strict qui seraient concernées par la macro "IdentifierPointsCollecte".
J'ai commencé mes saisies sur une base de 999 chiffres mais je perds la possibilité d'introduire des points de collecte sans mettre une pagaille monstrueuse dans le fichier liste.
En plus le remplacement des cellules alphanumériques par des cellules numériques nécessite un temps de traitement particulièrement pénible. Je vais essayer de désactiver les macros pour procéder aux remplacements.
Je vous tiendrai bien sûrs informés,
Mille mercis
Pierre