Macro défaillante - Bug au milieu d'une liste

Bonjour,

J'ai besoin d'aide sur une macro déjà écrite.

Cette macro sert à extraire une dimension d'un libellé. (exemple : ROSIER H33D25 ROSE EN POT - Le macro extrait : H33D25 dans une autre colonne).

Cette macro a été testé sur une listing de 34 lignes et fonctionne très bien mais lorsque je colle à la place un listing de 274 lignes la macro ne fonctionne plus.

Un message apparaît : Erreur d'exécution '9' : L'indice n'appartient pas à la sélection.

Je clique sur "Débogage" et le message "Select Case Ubound (X)" est surligné en jaune.

Si je ne change rien et que je ferme le mode VBA, la macro fonctionne jusqu'à la ligne 117.

Si je copie la ligne de 118 à 274, la macro ne fonctionne plus du tout plus rien ne s'affiche.

J'aimerai que cette macro fonctionne avec n'importe quel nombre de ligne que je colle, est-ce possible ?

Je vois que dans le code actuel, la macro ne s’exécute que sur "CurrentRegion" est ce cela qui pose problème ou est-ce à un autre niveau ?

En pièce jointe : Echantillon_test_250716 et Listing2_250716.

Merci d'avance.

Cordialement.

Bonjour,

Le problème provient de la ligne 116 : A3 LANTERNE LIMA 15L15H30 ROUGE

Remarque que devant le 15L... il y n'y a pas de lettre.

Ajoute une lettre quelconque et la macro se rend à la fin.

Gelinotte

Je cherchais tellement plus compliqué....

Merci beaucoup !!!!!!!!

Rechercher des sujets similaires à "macro defaillante bug milieu liste"