Enregistrer Sous

Gexk5 · 20 Avril 2010

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) · 20 Avril 2010

Re : Enregistrer Sous

Salut Gexk,
Voici avec replace....
Bruno

Code:

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 · 20 Avril 2010

Re : Enregistrer Sous

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

Enregistrer Sous

Gexk5

XLDnaute Occasionnel

Pièces jointes

youky(BJ)

XLDnaute Barbatruc

Gexk5

XLDnaute Occasionnel

Discussions similaires

Enregistrer Sous

Gexk5

XLDnaute Occasionnel

Pièces jointes

youky(BJ)

XLDnaute Barbatruc

Gexk5

XLDnaute Occasionnel

Discussions similaires

Privacy & Transparency

Privacy & Transparency