enreg via macro mais nom utilsant une fct

[JM]

Un amical bonjour à tt le forum
j'ai un ptit pb à résoudre:
l'utilisateur en cliquant sur un bouton, doit provoquer l'enregistrement du fichier courant

L'enregistrement doit être sous la forme: "Saisie en date du JJMMAA.xls"
dans mon essai ci-dessous, j'ai mis en cellule A30 le texte "Saisie en date du "
La cellule D3 contient une date saisie par l'utilisateur

Dim e As String * 18 'entête du nom de fichier
Dim d As String * 6 'date
e = Range("a30") ' Heures du
d = Range("D3")
ActiveWorkbook.SaveAs Filename:="C:\Heures\" & (e) & (d)

mais qq chose ne va pas : la date saisie en D3 est le résultat d'une fonction:
SI(B3=VRAI;AUJOURDHUI();"")
en fait, tout va bien si je saisis la date "à la main" dans D3, mais si elle résulte d'une fonction, VBA "bugge" !
quelqu'un aurait-il une idée ?
merci les EXCELents ! (enfin souvent rapides !)
JM

 

[@Christophe@]

Bonsoir,

Remplace comme ceci:

d = Format(Range("D3"), "ddmmyy")

Parce que la date s'enregistre avec les /

Un caractère interdit dans le nom d'un fichier

Bonne soirée

@Christophe@

 

[JM]

Bonjour Christophe et tt le forum
Merci pour ta suggestion, mais le problème n'est pas là:
je connaissais le pb des caractères interdits dans les noms de fichiers.
Le pb réside dans le fiat que la date n'est pas tapée par l'utilisateur,
elle est le résultat d'une fct SI.
Comme je l'ai expliqué dans mon exemple,
"L'enregistrement doit être sous la forme: "Saisie en date du JJMMAA.xls""
comme tu peux le constater, les / n'y sont pas
Merci qq mm pour ta réponse

Donc je suis tjrs demandeur
Merci d'avance à celle ou celui qui trouveras le jackpot !
JM