Insertion d'une feuille d'un au fichier excel

Résolu
kev76150 Messages postés 16 Statut Membre -  
kev76150 Messages postés 16 Statut Membre -
Bonjour, J'ai rencontré un problème aujourd'hui.
J'ai voulu insérer dans un classeur Excel une feuille issu d'un autre classeur.
J'ai réussi avec un classeur qui se trouve dans le même répertoire avec ceci : 

Workbooks("Classeur1.xlsx").Sheets("feuille X").Copy Before:=Workbooks("classeur2.xlsm").Sheets("feuille Y")


Mais j'ai besoin d'aller chercher cette feuille dans un autre sous dossier, j'ai donc essayé ceci : 

Workbooks("Classeur1.xlsx").Sheets("feuille X").Copy Before:=Workbooks("K:\xxxxxx\xxxxxx\classeur2.xlsm").Sheets("feuille Y")


et ça ne fonctionne pas.
Il y a t'il une solution ? ou Est-ce pas possible ?

Merci d'avance.
A voir également:

1 réponse

Réponse 1 / 1
f894009 Messages postés 17413 Statut Membre 1 715
 
Bonjour,

https://forums.commentcamarche.net/forum/affich-7228040-vba-excel-copie-feuille-dans-autre-classeur
1
kev76150 Messages postés 16 Statut Membre
 
Salut, Merci de ta réponse.
J'ai fait des essais mais le soucie c'est que ca fonctionne dans le sens inverse.
avec ce code : 

Private Sub CommandButton1_Click() 
Var_Chemin = "D:\Perso_JDC\Classeur2.xls" 
Fichier1 = ActiveWorkbook.Name 
 Workbooks.Open Var_Chemin, 0, ReadOnly:=False 
 Fichier2 = ActiveWorkbook.Name 
Workbooks(Fichier1).Sheets("Feuil1").Copy Before:=Workbooks(Fichier2).Sheets("Feuil3") 
End Sub


En gros je copie la feuille du classeur qui est ouvert dans un autre classeur qui n'est pas ouvert.
Moi je veut faire l'inverse. Je veut prendre une feuille d'un classeur non ouvert et la copier dans mon classeur qui est ouvert.
0
kev76150 Messages postés 16 Statut Membre
 
En faite c'est bon j'ai réussi.
Merci de ta réponse.
0