Enregistrer Sous

[Gexk5]

Bonjour le forum
Voici mon problème, je voudrais enregistrer mon fichier sour le nom de certaines celulles, ca je sais faire, le problème est que j'ai des dates dans mon nom de fichier au format jj/mm/aa, comment forcer l'enregistrement au format jj-mm-aa ??

Merci d'avance de vos reponses

Fichier joint pour plus de details
Sous Excel 2000 - 2003

 

[youky(BJ)]

Re : Enregistrer Sous

Salut Gexk,
Voici avec replace....
Bruno

Sub enregistre()
Dim NomFichier As String
Sheets("Contrat").Select
NomFichier = "Contrat" & "   " & Range("A2").Value & "   " & Range("C7").Value & Range("H7").Value & Range("I7").Value
Application.DisplayAlerts = False
NomFichier = Replace(NomFichier, "/", "-")
ActiveWorkbook.SaveAs "G:\" & NomFichier
Application.DisplayAlerts = True
End Sub

 

[Gexk5]

Re : Enregistrer Sous

Re le forum, Youky
Si ca c'est pas du service rapide, j'y connais rien
Merci, excellent , ca fontionne parfaitement