Discussion :

[krapoulos]

Bonjour et merci d'avance pour votre aide

J'ai un classeur ouvert qui se nomme 'Old'
Dans ce classeur j'ai une feuille qui se nomme 'Feuille_Old'

je veux à travers la ligne de code ci-dessous bouger la Feuille_Old (ou avec move ou copy) dans un nouveau classeur 'test.xlsm' se trouvant sur 'C:\fichiers\ à la 'Feuil1'

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Sheets("Feuille_Old").Move Before:=Workbooks("C:\fichiers\test.xlsm").Sheets(“Feuil1”)

Mais maligne ci-dessus ne fonctionne pas.

2 raisons possibles, une erreur dans le code ou le fait que mon classeur 'Old' soit protégé par un mot de passe.

Merci pour votre aide.

[Menhir]

Tu ne peux pas transférer une feuille dans un fichier qui n'est pas ouvert.

Donc, commence par faire un Workbooks.Open sur ton fichier destination et ensuite de faire ton move ou copy en ne mettant que le nom de fichier (sans chemin) dans le Workbook destination.

[keygen08]

Bonjour

Code vb :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
 
Sub Macro1()
Dim cls As Workbook
 
Set cls = Workbooks.Open("C:\Classeur1.xlsx")
    ThisWorkbook.Sheets(1).Copy Before:=Workbooks(cls.Name).Sheets(1)
End Sub