XL 2016 chercher copier

[zozo31270]

Bonjour je suis totalement novice en VBA et je voudrais faire une macro qui cherche pour chaque cellule de la colonne A d'une feuille 1 une valeur de type 00000 et qui copie cette valeur en colonne A de la feuille 2.
merci pour votre aide

 

[M12]

Bonjour,

Avec un classeur exemple, c'est mieux

 

[zozo31270]

voici le fichier je souhaiterais que dans la feuille 2 les prénoms apparaissent en colonne A et en face en colonne B les numéros.

 

[M12]

Re,

Avec une fonction qui fait le nécessaire (elle n'est pas de moi, mais je remercie celui qui l'avait construite)

 

[job75]

Bonjour zozo31270, M12,

Le VBA n'est pas nécessaire, 2 formules matricielles font très bien l'affaire en Feuil2!A1 et Feuil2!B1 du fichier joint :

=STXT(SUPPRESPACE(Feuil1!A1);MAX(SI(ESTNUM(-STXT(SUPPRESPACE(Feuil1!A1);1;LIGNE(INDIRECT("1:"&NBCAR(SUPPRESPACE(Feuil1!A1))))));LIGNE(INDIRECT("1:"&NBCAR(SUPPRESPACE(Feuil1!A1))))))+1;99)

=STXT(SUPPRESPACE(Feuil1!A1);1;MAX(SI(ESTNUM(-STXT(SUPPRESPACE(Feuil1!A1);1;LIGNE(INDIRECT("1:"&NBCAR(SUPPRESPACE(Feuil1!A1))))));LIGNE(INDIRECT("1:"&NBCAR(SUPPRESPACE(Feuil1!A1)))))))

A valider par Ctrl+Maj+Entrée et tirer vers le bas.

A+

 

[M12]

Bonjour job75,

Après, faut pas des centaines de lignes

 

[job75]

Après, faut pas des centaines de lignes

En terme de rapidité ta fonction VBA et ma formule matricielle sont équivalentes.

Chez moi 3,3 millièmes de seconde pour calculer les 4 formules en A1 B1 A2 B2.

 

[zozo31270]

Re,

Avec une fonction qui fait le nécessaire (elle n'est pas de moi, mais je remercie celui qui l'avait construite)

c'est super merci

 

[zozo31270]

merci pour vos réponses c'est super