Macro importer des données d'un classeur externe
noe2008
Messages postés
191
Statut
Membre
-
michel_m Messages postés 18903 Date d'inscription Statut Contributeur Dernière intervention -
michel_m Messages postés 18903 Date d'inscription Statut Contributeur Dernière intervention -
Salut les amis ,
j'ai besoin d'une macro pour importer des données d'un classeur excel 2010 à un autre , c'est à dire quand exécute la macro elle me laissera le choix de choisir le classeur qui se trouve dans mon disque dure , une fois sélectionné et ouvert elle copie les données de la feuille active de B12:B42 dans le classeur de départ dans la feuille active dans C22:C52
cordialement !
j'ai besoin d'une macro pour importer des données d'un classeur excel 2010 à un autre , c'est à dire quand exécute la macro elle me laissera le choix de choisir le classeur qui se trouve dans mon disque dure , une fois sélectionné et ouvert elle copie les données de la feuille active de B12:B42 dans le classeur de départ dans la feuille active dans C22:C52
cordialement !
1 réponse
-
bonjour
a mon humble avis il serait + prudent d'indiquer le nom des feuilles plutôt qu' activesheet, sauf si tu n'as qu'une seule feuille dans les 2 classeurs
Option Explicit
'----------
Sub copier_externe()
Dim Fich As String, tampon
Fich = Application.GetOpenFilename
Workbooks.Open (Fich)
tampon = ActiveSheet.Range("B12:B42")
ActiveWorkbook.Close
Range("C22:C52") = tampon
End Sub
-
Merci michel
la feuille source s'appelle " Donnée" la feuille destination s'appelle "Nom"
je veux ajouter dans la macro de copier aussi les cellules A2:D2 et N3:P12 du classeur destination dans E3:G3 et H6:J15 du classeur de départ
merci infiniment- Pourquoi ne pas annoncer la globalité de ce que tu désires au départ ?
Il faut bien te rendre compte que ce que tu demandes n'est pas forcément facile et que personne ne veut passer parfois plusieurs heures à essayer de résoudre un problème bénévolement pour se voir dire après coup:" il faut en plus que.... "
-