copier des cellules d'un dossier à un autre

[michel]

bonjour à tous,

question simple...sauf pour moi
Avec VBA, je voudrais copier automatiquement les cellules B2 et C5 de la feuil1 du classeur A ( situé dans Mes documents) vers les cellules B1 et C8 de la feuil2 du classeur B, toujours dans Mes documents.
Comment faire ? Je sais faire entre 2 feuilles du même dossier mais pas dans des dossiers différents.
Merci de votre aide et bonne journée à tous.
Michel

 

[Adeus33]

Bonjour michel
tu peux essayer avec ca

Sub Macro1()
    Windows('classeurA.xls').Activate
    Range('B2:C5').Select
    Selection.Copy
    Windows('classeurB.xls').Activate
    Range('B1:C8').Select
    ActiveSheet.Paste
End Sub

Voila bon courage

Il faut que tes deux fichier soient ouvert avant de lancer la macro

Adeus33

 

[michel_m]

Bonjour Michel, Adeus

Proposition en VBA à partir de classeur1:

Range('B2').Copy Workbooks('classeur2').Sheets('feuil2').Range('B1')
Range('C8').Copy Workbooks('classeur2').Sheets('feuil2').Range('C5')

D) Adeus, lmes 2 fichiers ouverts
A+
Michel_M