XL 2016 Sélection

bobafric

XLDnaute Occasionnel
Bonjour à tous.
dans un classeur sur la feuille liste dans la colonne A les noms qu'il faut copier et coller dans les feuilles correspondantes.
Exemple sur le fichier joint.
Peut on trouver une macro pour automatiser l'action sélectionner copier coller sur chaque feuille du même nom.
Merci d'avance pour votre aide
 

Pièces jointes

  • selection.xlsx
    11.7 KB · Affichages: 18

JBARBE

XLDnaute Barbatruc
Bonjour à tous,
J'ai eu pas mal de difficulté sur ce fichier pour écrire la macro comme elle devrait être ! comment ce fait-il !!!
En cliquant sur le bouton GO !
Bonne journée !
 

Pièces jointes

  • selection.xlsm
    25.2 KB · Affichages: 7
Dernière édition:

_Thierry

XLDnaute Barbatruc
Repose en paix
Bonsoir @bobafric @JBARBE , le Forum

En partant du principe que l'espace est le séparateur pour trouver le nom de feuille...
Plus une gestion d'erreur si la Feuille n'est pas trouvée

Bonne soirée
@+Thierry
 

Pièces jointes

  • XLD_bobafric_Repartition_By_Sheets_selection.xlsm
    23.3 KB · Affichages: 4

job75

XLDnaute Barbatruc
Bonjour bobafric, JBARBE, _Thierry,

Dans chacune des feuilles des noms formule matricielle en A1 :
Code:
=SIERREUR(INDEX(liste!A:A;PETITE.VALEUR(SI(ESTNUM(CHERCHE(STXT(CELLULE("filename";A1);TROUVE("]";CELLULE("filename";A1))+1;31);liste!A$1:A$1000));LIGNE(liste!A$1:A$1000));LIGNE(A1)));"")
à valider par Ctrl+Maj+Entrée et tirer vers le bas.

A+
 

Pièces jointes

  • selection(1).xlsx
    13.9 KB · Affichages: 3

bobafric

XLDnaute Occasionnel
Bravo et merci pour votre travail mais désolé les gars je me suis mal expliqué.
La feuille liste contient des lignes de phrases dans lesquelles sont les noms que l'on doit extraire.
Les autres feuilles ne sont pas identifiées.
Je voudrai en tapant le nom recherché sur la feuille 1 ou 2 exemple alain blanc retrouver tousles alain blanc sur cette feuille soit alin blanc 1, alain blanc 3
je joins un exemple en espérant que ce soit plus clair
Merci beaucoup pour votre patience
 

Pièces jointes

  • selection2.xlsx
    13.6 KB · Affichages: 4

job75

XLDnaute Barbatruc
Je n'ai jamais parlé de macro :rolleyes:
Code:
=SIERREUR(INDEX(liste!A:A;PETITE.VALEUR(SI(ESTNUM(CHERCHE(G$3;liste!A$1:A$1000));LIGNE(liste!A$1:A$1000));LIGNE(A1)));"")
 

Pièces jointes

  • selection(2).xlsx
    14.4 KB · Affichages: 4

Discussions similaires

Membres actuellement en ligne

Aucun membre en ligne actuellement.

Statistiques des forums

Discussions
314 022
Messages
2 104 732
Membres
109 116
dernier inscrit
RALAIZANAKA