Creation de nouveau nom de feuille

Bonjour a tous je vois pas du tout comment faire cela meme pas l ebauche d un morceau de code

j aimerai quand je clique sur inserer une nouvelle feuille de calcul il me nomme cette feuille a la date +1 de la feuille precedente

exemple

feuille 1 date 22/11

je clique sur inserer une nouvelle feuille et la la feuille se nomme 23/11 etc

merci

Bonsoir sat3367, le forum,

Sinon, un exemple.....

Cordialement,

Bonsoir,
Une autre proposition à adapter !...
Cdlt.

Option Explicit

Private Sub Workbook_NewSheet(ByVal Sh As Object)
Dim oldSheetName As String, newSheetName As String
    oldSheetName = Sh.Previous.Name
    newSheetName = Format(CDate(oldSheetName) + 1, "yyyy-mm-dd")
    Sh.Name = newSheetName
End Sub

c est parfait un grand merci