Renommer Feuille avec date et heure du jour

[aubelix]

Bonjour à tous les amis du Forum.

Une nouvelle question portant sur une sauvegarde
sous la date et heure du jour.


Mon code ci-dessous :


Sheets("DATA").Select
Sheets("DATA").Copy After:=Sheets(1)
Sheets("DATA (2)").Select
'Sheets("DATA (2)").Name = "ARCHIVES" & Date


Je bloque au niveau de la ligne en rouge.
Comment recopier la feuille "DATA" sous "DATA du 08-03-09 11h30"

Par avance Merci pour votre aide.
Cordialement.

 

[BOISGONTIER]

Re : Renommer Feuille avec date et heure du jour

Bonjour,

Sheets("xyz")).Name = "xxx" & Format(Now, "dd-mm-yyyy hh \h mm")

JB
Formation Excel VBA JB

 

[Pierrot93]

Re : Renommer Feuille avec date et heure du jour

Bonjour Aubelix

essaye peut être ainsi :

ActiveSheet.Name = "Data du " & Format(Now, "dd-mm-yy hh""h""nn")

bon dimanche.
@+

 

[aubelix]

Re : Renommer Feuille avec date et heure du jour

Bonjour Jacques, Pierrot93.

Merci pour vos réponses respectives.
Je les ai testées, elles fonctionnent très bien.
J'ai l'embarras du choix.

Bonne fin de dimanche.
Cordialement