Copie d'une feuil dans un nouveau classeur

Bonjour à tous et toutes,

voila mon problème, j'ai un classeur excel me permettant de gérer mon stock outillage.

Je voudrai qu'au lancement de ma macro, vba me face une copie de ma feuille ("BDDoutil") à la même racine que mon classeur Excel, en la renommant : Sauvegarde.xls

Sa encore, sa peux aller; mais je voudrai que cette action se face en fond de tache sans que l'utilisateur du fichier excel s'en rende compte

Voila le code que j'ai tapé, il fonctionne mais me bascule automatiquement sur le classeur Sauvegarde.xls

Dim chemin As String
Range("chemin") = Left(Workbooks(ActiveWorkbook.Name).FullName, 39)

Sheets("BDDoutil").Copy
ClasseurCible = "Sauvegarde.xls"
chemin = Range("chemin")
ActiveWorkbook.SaveAs chemin & ClasseurCible

Bonjour

A tester

Sub test()
Dim chemin As String

  With Application
    .ScreenUpdating = False
    .DisplayAlerts = False        ' Ecrase l'ancien sans poser de question
  End With

  chemin = ThisWorkbook.Path & "\"

  Sheets("BDDoutil").Copy
  ActiveWorkbook.SaveAs chemin & "Sauvegarde.xls"
  ActiveWorkbook.Close
End Sub

OK, merci pour ta réponse

Je test ça cet aprem et je te dis !

testé, sa fonctionne nickel !!!

grand merci à toi