Bonjour
Est-ce cela que tu recherches.... J'ai crée l'onglet " - " qui sert de base pour dupliquer et créer le nouvel onglet client.
J'ai ajouté dans ThisWorkbook le code suivant qui enregistre automatiquement le nom de l'onglet avec les données insérées dans la cellule A1
Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
If Cells(1, 1) <> "" Then ActiveSheet.Name = Cells(1, 1)
End Sub
et j'ai complété le code du bouton "Enregistrer le client" dans le formulaire "Ajouter un client"
Sheets(" - ").Copy , Worksheets(Worksheets.Count)
Sheets(" - (2)").Move , Worksheets(1)
Worksheets(" - (2)").Visible = True
Range("A1").Value = nomclient