Creation d'onglet

Bonjour! J'aimerais savoir s'il y a moyen de creer un onglet (feuille) qui apparait toujours a la FIN des autres feuilles dans un document... avec la macro il apparait seulement a une position donnée... et aussi s'il est possible de renommer automatiquement cette feuille avec la date actuelle...

Au fond je veux que lorsque je click sur un bouton, Excel copie ma feuille "blank" a la fin des feuilles avec la date daujourd'hui...

Bonsoir lamailloche

Code modifié selon ta demande (Non testé)

Sub CopySheetRename() 
'Code de Myta
With ActiveWorkbook.Sheets
.Add after:=Worksheets(Worksheets.Count)
End With
ActiveSheet.Name = format(date dd-mm-yy )
End Sub

Bonjour à tous,

Tu peux compacter ça en une ligne :

Sub Test()
    Worksheets.Add(after:=Worksheets(Worksheets.Count)).Name = Format(Date, "dd-mm-yy")
End Sub

Cordialement.

Rechercher des sujets similaires à "creation onglet"