Inclure l'année en cours dans l'enregistrement de mon fichier avec VBA

Résolu
Emi80110 Messages postés 68 Date d'inscription   Statut Membre Dernière intervention   -  
ccm81 Messages postés 10909 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour bonjour

J'aimerai pouvoir inclure dans une VBA, l'enregistrement de mon fichier avec nom de fichier variable selon l'année en cours.

Exemple:
Cette année mon fichier s'enregistrerai sous le nom "Calcul prime DI 2021".
Sauriez-vous me dire comment je pourrai le traduire dans ma VBA svp ?
A voir également:

1 réponse

ccm81 Messages postés 10909 Date d'inscription   Statut Membre Dernière intervention   2 433
 
Bonjour

Pour enregistrer dans le même doosier

Option Explicit

Const ext = ".xls"  'pour toi ce sera .xlsm (pour excel > 2007)

Sub Enregistrer()
Dim chemin As String, nomfic As String
chemin = ActiveWorkbook.Path & "\"
nomfic = "Calcul Prime D_" & Year(Date) & ext
ActiveWorkbook.SaveAs chemin & nomfic
End Sub

Cdlmnt

RQ. Fichier modifié
0