Créer un fichier excel à l'ouverture d'un autre [Résolu/Fermé]

Bonjour,

Je souhaite lors de la première ouverture d'un fichier excel créer un autre à la racine du dossier du premier en faisant une copie d'un onglet.
En effet, il s'agit d'une base de données qui appartiendra à l'utilisateur.
Cela me permettra également de modifier le premier tableur sans toucher à la base de données de l'utilisateur. Egalement cela me permettra d'importer une base de donnée.
Merci d'avance de vos propositions.
J'utilise déjà la création d'un dossier .
Je pourrais utiliser ce dossier comme destination.
L'onglet à copier s'appelle : "Liste Clients"

Sub TesteSiDossierExiste()

Dim MonDossier As String

MonDossier = ThisWorkbook.Path & "\DEVIS "

    If DossierExiste(MonDossier) = True Then
       ' MsgBox "Le dossier existe..."
    Else
      MkDir (ThisWorkbook.Path & "\DEVIS ")
    End If

End Sub
Public Function DossierExiste(MonDossier As String)

   If Len(Dir(MonDossier, vbDirectory)) > 0 Then
      DossierExiste = True
   Else
      DossierExiste = False
   End If
End Function

Quel sera alors le chemin à indiquer dans les macros pour aller chercher ce fichier ?

ChDir (ThisWorkbook.Path & "\DEVIS ")

Looping