Transfert de données entre deux fichiers Excel

Signaler
Messages postés
17
Date d'inscription
mardi 18 mai 2004
Statut
Membre
Dernière intervention
27 décembre 2005
-
Messages postés
17
Date d'inscription
mardi 18 mai 2004
Statut
Membre
Dernière intervention
27 décembre 2005
-
Salut à tous,

Tout d'abord merci d'avance de bien vouloir prendre un peu de votre temps pour lire et répondre à cette demande d'aide.

J'ai deux fichier excel, un "toto.xls" et un "momo.xls".

Je souhaite créer une macro sur le fichier "toto.xls" (via un petit bouton de lancement) qui permet de copier la cellule "A,1" de l'onglet "mimi" du fichier "momo.xls" sur le fichier "toto.xls" dans la cellule "A,1" de l'onglet "titi".

Voilà, je craque car je n'arrive pas à faire cette copie.

Merci d'avance de votre aide

2 réponses

Messages postés
190
Date d'inscription
lundi 24 mars 2003
Statut
Membre
Dernière intervention
27 septembre 2005

Un petit exemple:

Sub CopieMimiTiti()
'selectionne la feuille mimi du classeur1 "momo"
    Sheets("mimi").Select
'selectionne la cellule A1
    Range("A1").Select
'copie A1
    Selection.Copy
'ouvre le classeur 2 "toto"
    Windows("Classeur2").Activate
'selectionne la feuille "titi"
    Sheets("Titi").Select
'selectionne la cellule a1
    Range("A1").Select
'colle depuis le presse papier
    ActiveSheet.Paste
End Sub


Bonne soirée et A+

MD
Messages postés
17
Date d'inscription
mardi 18 mai 2004
Statut
Membre
Dernière intervention
27 décembre 2005

Merci de ce petit exemple mais il ne convient pas à mon besoin. Donc, je vais détailler un peu plus ma demande.

J'ai deux fichier excel, un "toto.xls" et un "momo.xls".

Voici le contenu du fichier "momo.xls" de la feuille "mimi" :

A B C
1 FRA 10
2 DEU 11
3 FRA 05
4 NLD 1

voici ce que je souhaite obtenir dans le fichier "toto.xls" de la feuille "titi" :

A B C
1 DEU 11
2 FRA 15
3 NLD 05
4

Voilà j'espère que c'est compréhensible.