Problème d'userform

[adr95]

Bonjour,

J'ai un problème sur mon fichier en pièce jointe.

Je souhaite sauvegarder le fichier avec la date du jour avec un enregistrer sous pour archiver (cette partie est ok).

J'ai un problème avec le fichier je dois après le mettre le remettre à jour (j'ai gardé la sauvegarde) cependant je souhaite modifier la date pour cela j'utilise l'userform4 mais sur le fichier essaie la modification de la date de marche pas. code dans l'userform1 bouton command1.

Merci pour l'aide

 

[Bebere]

Re : Problème d'userform

bonjour Adr
date du jour TextBox1=date
pour mettre dans la feuille
Range("A3") = CDate(TextBox1)
ou dans ton cas
Range("A3") = CDate(TextBox1.Text & "/" & TextBox2.Text & "/" & TextBox3.Text)
attention pour les noms de fichier il y a des caractères interdits(touche F1 appel aide)
ne pas utiliser replace,dans ce cas tu n'as plus une date
exemples pour nom de fichier valable
MonFichier = Range("A1").Value & format(Range("A3").Value ,"ddmmmyyyy") & ".xls"
ou
MonFichier = Range("A1").Value & format(Range("A3").Value ,"dd-mm-yyyy") & ".xls"

 

[adr95]

Re : Problème d'userform

Bonjour Bebere,

Merci pour ta réponse c'est vrai que c'est plus facile ta façon d'enregistrer avec la date du jour.