Indiquer la provenance de données copiées

Djedjo92 Messages postés 3 Date d'inscription   Statut Membre Dernière intervention   -  
Frenchie83 Messages postés 2240 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,

Sur mon fichier j'ai trois onglets 1, 2, 3 qui contiennent le même tableau avec des données différentes. J'ai fais un macro pour copier les colonnes de mes tableau 1, 2, 3 dans un onglet TOTAL. J'aimerai créer une macro dans l'onglet TOTAL qui m'indiquerai d'ou viennent les données copiés c'est à dire la colonne A de mon onglet TOTAL se remplirai d'un 1, 2 ou 3 !

Si vous pouvez m'aider je suis preneur.
N'hésiter pas à me dire si ce n'est pas assez claire..

Merci d'avance


A voir également:

1 réponse

Réponse 1 / 1
Frenchie83 Messages postés 2240 Date d'inscription   Statut Membre Dernière intervention   338
 
Bonjour
Exemple pour le principe
au début de votre code, après avoir pointé sur la feuille 1 ou 2 mettre la ligne suivante 
FeuilSel=Activesheet.Name  'pour récupérer le nom de la feuille

Ensuite lorsque que vous pointé sur la feuille 3 pour la recopie, rajouter la ligne suivante: 
Cells(ActiveCell.Row, 1) = FeuilSel ' recopie le nom de la feuille dans la cellule active de la colonne A

A adapter à votre fichier
Cdlt
0

Discussions similaires

Erreur la zone de données passée à un appel système est insu
Vincent -
Panth33ra -

5 réponses
relation d'approbation
leila -
Inf -

22 réponses
Barre de données en pourcentage (maintenir 100% comme max)
Jessica -
Jessica -

2 réponses
je tombe sur le service de diffusion des donnees?que faire?
cockies -
PeterPan972 -

5 réponses
TNT base de donnees vide!!
Angye25 -
Angye25 -

4 réponses