VBA sheets + date
Résolu
Bonjour,
J'ai besion d'aide pour créer une page automatiquement en nommant celle-ci par la date du jour.
Voila ce que j'ai pour le moment comme code :
Sheets("DPE").Select
Sheets.Add
Merci pour tous ceux qui pourront m'aider
J'ai besion d'aide pour créer une page automatiquement en nommant celle-ci par la date du jour.
Voila ce que j'ai pour le moment comme code :
Sheets("DPE").Select
Sheets.Add
Merci pour tous ceux qui pourront m'aider
2 réponses
-
ModérateurBonjour,
Lorsque tu crées une feuille par sheets.Add, celle ci devient la feuille active. Tu n'as donc plus qu'à la renommer. Il faut également faire attention au format de la date car on ne peux pas nommer une feuille avec des carctères spéciaux tels que : /:; etc...
Donc ton code devient :Sheets.Add ActiveSheet.Name = Format(Date,"dd mm yyyy")
ActiveSheet = feuille active
Date = date du jour
"dd mm yyyy" est le format à adapter selon tes souhaits
Dans l'absolu il faudrait tester d'abord l'existence de la feuille car il y a un risque de bug en cas de double création... -
Merci pijaku pour la réponse ^^
