probleme pour enregistrer un fichier

[jarod93]

bonjour a tous j'ai un probleme pour enregistrer un fichier , le nom du fichier est en fonction des données d'une feuille , mais le probleme c'est que je fais réference a une date qui contient des "/" et excel voit sa comme un lien vaire un dossier et ne veut pas enregistrer , quand je fait reference a une autre cellule cela marche tres bien , je met mon code :

Dim chemin As String, fichier As String
ActiveSheet.Copy
chemin = ThisWorkbook.Path
fichier = chemin & "\" & Range("d2") & "-" & Range("d5") & ".xls"

ActiveWorkbook.SaveAs Filename:=fichier

ActiveWorkbook.Close

'range("d2") est un nom et un prenom
'range("d5") est une date de la forme jj/mm/aa

merci par avance pour votre aide

 

[soune26]

Re : probleme pour enregistrer un fichier

Salut
Il te faut imparativement une date je presume
Alors quand tu enregistre supprime automatiquement les "/"
BIZZZZZZZZ

 

[tototiti2008]

Re : probleme pour enregistrer un fichier

Bonjour jarod, Bonjour soune,

à tester

fichier = chemin & "\" & Range("d2") & "-" & format(Range("d5"),"dd_mm_yyyy") & ".xls"

 

[jarod93]

Re : probleme pour enregistrer un fichier

oui absolument , comment je pourrais faire pour supprime les "/" ?

 

[JNP]

Re : probleme pour enregistrer un fichier

Bonjour le fil ,
Teste

fichier = chemin & "\" & Range("d2") & "-" & Format(Range("d5"), "dd-mm-yy") & ".xls"

Bonne journée
Ajout : Grillé sur le fil, arg

 

[jarod93]

Re : probleme pour enregistrer un fichier

merci tototiti2008 sa marche nickel tu gere , sa remplace les "/" par des "_"

 

[soune26]

Re : probleme pour enregistrer un fichier

merci JNP !!!!

 

[jarod93]

Re : probleme pour enregistrer un fichier

merci a toi aussi jnp