Format de Cellule dans VBA

[Zill]

Bonjour,

Je voudrais sauvegarder la date placée en [EY17] comme nom de fichier par ex. 2012-09-14 - vendredi.xls.

Voici ma macro:

Sub Enregistrement_Date()
'
' Enregistrement_Date Macro
'
' Touche de raccourci du clavier: Ctrl+Shift+S
'
ChDir _
"C:\Users\ZiLL\Desktop\Infrabel\Prestation\Rapport I50HL\2012-09 Septembre 2012"
ActiveWorkbook.SaveAs Filename:=[EY17]
End Sub


Bien que le format de la cellule EY17 soit [$-140C]aaaa-mm-jj - jjjj (2012-09-14 - vendredi) l'enregistrement m'indique un fichier intitulé "41166.xls.

3 jours que je cherche la solution. Help me please ! Lol...

 

[Modeste geedee]

Re : Format de Cellule dans VBA

Bonsour®

Bonjour,

Je voudrais sauvegarder la date placée en [EY17] comme nom de fichier par ex. 2012-09-14 - vendredi.xls.

Voici ma macro:

Sub Enregistrement_Date()
'
' Enregistrement_Date Macro
'
' Touche de raccourci du clavier: Ctrl+Shift+S
'
ChDir _
"C:\Users\ZiLL\Desktop\Infrabel\Prestation\Rapport I50HL\2012-09 Septembre 2012"
ActiveWorkbook.SaveAs Filename:=[EY17]
End Sub


Bien que le format de la cellule EY17 soit [$-140C]aaaa-mm-jj - jjjj (2012-09-14 - vendredi) l'enregistrement m'indique un fichier intitulé "41166.xls.

3 jours que je cherche la solution. Help me please ! Lol...

ActiveWorkbook.SaveAs Filename:=format([EY17],"yyyy-mm-dd - dddd")

 

[Zill]

Re : Format de Cellule dans VBA

Mer-ci !!!