XL 2010 Copier coller une feuille sous format de date du jour

[Misoka]

Bonjour,

J'ai voulu dupliquer une feuille entière avec ses données. Sous VBA je ne connais pas du tout le language à attribuer pour pour nommer cette nouvelle feuille copier à la date du jour. j'ai essayé cette commande mais elle ne passe pas.

Sheets("Global passage").Copy After:=Sheet.Name = Format(Date, "dd mmm")

Merci de votre aide

 

[Ikito]

Bonjour Misoka,

Voir fichier ci-joint. Si tu veux plus d'explication, n'hésite pas.

 

[Misoka]

Hello Ikito,

Merci de ta réponse, ton fichier est en liaison avec un autre classeur. Je ne vois pas de macro defini dans ton bouton 1.

 

[Ikito]

Oups...
Le fichier en PJ.

 

[Misoka]

Re,

C'est cool elle marche nickel. Merci beaucoup

 

[Misoka]

Re !

Sorry pour le dérangement si je souhaite afficher ma bdd en copie renomé à la date du jour c'est quel sheets que je dois use ?
Nomfeuille = "BDD"
Sheets("BDD").Copy Before:=ActiveSheet
Sheets("BDD").Select
ActiveWindow.SelectedSheets.Visible = False
Sheets(Nomfeuille & " (2)").Name = Day(Date) & "." & Month(Date) & "." & Year(Date)

---> Sheets("Nomfeuille & " (2)").Select

Mais ca me compile mal ma feuille

 

[Misoka]

Re,

Ah c'est bon c'est tout simple j'ai juste eu du mal à réfléchir à cette heure....


Nomfeuille = "BDD"
Sheets("BDD").Copy Before:=ActiveSheet
Sheets(Nomfeuille & " (2)").Name = Day(Date) & "." & Month(Date) & "." & Year(Date)
Sheets("BDD").Visible = False


CA marche mieux comme ça