Copier une feuille Excel dans un fichier Excel fermé

Bonjour,

Je cherche à copier (via VBA) une feuille d'un fichier Excel (ouvert) vers un autre fichier Excel fermé.
Je désire faire cela car l'ouverture du fichier fermé prend beaucoup de temps (fichier d'une dizaine de Méga).

Vais-je gagner du temps ?
Si non, oubliez cette demande

Merci ä vous

Jean-Pierre

Bonjour,

Voici un essai où il faut adapter le nom du fichier fermé (qu'on va ouvrir forcément) et le nom de la feuille à copier :

sub test()
sfilename$ = "....." 'chemin du fichier fermé
application.calculation = xlmanual
with workbooks.open(sfilename)
    thisworkbook.sheets("Feuilleacopier").copy after:=.sheets(.sheets.count)
    .close true
end with
application.calculation = xlautomatic
end sub

Cdlt,

Bonjour et un grand merci pour cette réponse qui fonctionne très bien.

Passons aux détails. Voici ce que je cherche à faire.

J’ai deux fichiers :

- Un fichier fermé qui contient quelques centaines de feuilles dont les noms sont des dates
exemple : ( 15.11.2022 / 14.11.2022 / 10.11.2022 / 8.11.2022 / etc)

- Un fichier ouvert qui contient une dizaine de feuilles dont les noms sont aussi des dates
exemple : ( 4.12.2022 / 1.12.2022 / 30.11.2022 / 28.11.2022 / etc)

J’aimerais transférer dans le fichier fermé, depuis le fichier ouvert, toutes les feuilles sauf les deux les plus récentes.

Après le transfert le fichier fermé devrait avoir la structure d’onglet comme suit :

30.11.2022 / 28.11.2022 / …… etc / 15.11.2022 / 14.11.2022 / 10.11.2022 / 8.11.2022 / …… etc)

J’effacerai manuellement dans le fichier ouvert les feuilles que le VBA vient de transférer.

Merci pour votre aide car je suis incapable de réaliser cela

Bon j'ai trouvé une autre solution.

Merci pour votre coup de main