Enregistrement sous format date
Bonjour,
J'enregistre en vba un fichier excel au format pdf, je me sert de la cellule A1 comme nom, puis de la cellule A2 comme répertoire et de la cellule A3 comme date.
Dont voici le code.
Code:
1 2 3 4 5 6 7 8 9 10 11
|
Dim répertoire As String
Dim nom As String
Dim date As String
nom = Sheets("Feuil1").Range("A1").Value
répertoire = Sheets("Feuil1").Range("A2").Value
datefiche = Sheets("Feuil1").Range("A3").Value
Sheets("Feuil1").ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
répertoire & " " & nom & " " & date, Quality:= _
xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, _
OpenAfterPublish:=False |
Ca fonctionne très bien sans la date, mais moi j'aimerais rajouter la date..
Mais elle est d'office au format ( jj/mmm/08) et on ne peut pas enregistrer un fichier pdf avec le signe /....
Comment puis-je faire ?
Comment changer le format date à l'enregistrement ?
Merci de votre aide.
Bien cordialement
Enregistrement sous format date
Bonsoir,
Merci deuxmains et merci ucfoutu pour le complément fort utile.
Bien cordialement