Problème enregistrement fichier (format date)

[toinou69]

Bonjour à tous,

Voilà j'ai créé cette macro pour enregistrer le document avant que celui-ci ne soit envoyé par mail.

Sub Sauvegardemail()

fournisseur = Cells(8, 14)
redacteur = Cells(9, 14)
ladate = Cells(10, 14)

ActiveWorkbook.SaveAs Filename:= _
"C:\Temp\" & fournisseur & "_" & redacteur & "_" & ladate format(ladate,DDMMYY), FileFormat:=xlNormal, _
Password:="", WriteResPassword:="", ReadOnlyRecommended:=False, _
CreateBackup:=False

ActiveWorkbook.SendMail Recipients:="michel.moumou@tintin.com", _
Subject:="Test envoi évaluation fournisseur", _
ReturnReceipt:=True
End Sub

mais voilà, j'ai un soucis avec la date, car l'enregistrement n'accepte pas les / dans le nom du fichier j'ai donc essayer de modifier le format de celle-ci. J'avoue ne pas bien m'y connaître votre aide serez donc la bienvenue.

Merci.

 

[PascalXLD]

Re : Problème enregistrement fichier (format date)

Bonjour

essaies la partie Filename ainsi

Filename:="C:\Tmp\" & fournisseur & "_" & redacteur & "_" & Format(ladate, "ddmmyy")

 

[toinou69]

Re : Problème enregistrement fichier (format date)

Bonjour,

Et ben voilà, j'avais écris la ligne comme cela, mais j'avais oublié les guillemets!!!

Merci encore et bon week-end 😀