Macro pour enregistrement en changeant de date de semaine
c
Bonjour,
Je suis en train de créer une macro qui me permet de ranger automatiquement des fichiers dans les dossiers concernés.
Cette opération se fait chaque semaine, et je dois donc chaque fois que je lancerais ma macro que les fichiers crées n'écrasent pas les autres et s'enregistrent automatiquement avec un nom de fichier déterminé + le numéro de la semaine en cours.
Merci de votre aide.
Cece31
Bonsoir,
Plutôt que d'utiliser le N° de semaine qui se répetera chaque année, utilise la date. Cela t'assurera moins d'erreur.
exemple de code :
Sub sauvefichier()
Dim nomfichier As String, chemin As String
chemin = "C:\"
nomfichier = "nomfichier" & "_" & Format(Date, "yymmdd") ' ou Format(Date, "yymmdd") & "_" & "nomfichier"
ActiveWorkbook.SaveAs Filename:=chemin & nomfichier & ".xls"
End SubAmicalement