Macro VBA

Bonjour,

Quelqu'un connaît-il le code pour créer une nouvelle feuille de calcul et la renommer à la date du jour ?

Merci d'avance.

Salutations,

Dadams51

Sub Feuildatedujour()
Dim datedujour As String
datedujour = Format(Now, "dd-mm-yyyy")
Sheets.Add
ActiveSheet.Name = datedujour
End Sub

sinon un vrai titre c'est pas mal, genre "créer une feuille nommée à la date du jour".

en espérant t'avoir aidé.

Cdt

Harissa

Bonjour,

Avec une petite précision :

Public Sub AddSheet()
Dim dt As String
    dt = Format(Date, "dd-mm-yyyy")
    ActiveWorkbook.Sheets.Add After:=Worksheets(Worksheets.Count)
    ActiveSheet.Name = dt
End Sub

Bonjour,

Merci, ça fonctionne.

Par contre cette nouvelle feuille est créée avant la feuille initiale. Comment faire pour la créer après ?

Salutations,

Damien


Oups,

Merci Jean-Eric, ça réponds à ma question pour la position de la nouvelle feuille.

A bientôt !

Dadams51

Rechercher des sujets similaires à "macro vba"