année Résolu/Fermé

Question

Bonjour à tous, 

je cherche le code pour écrire 2015-2016, j'ai déjà l'année encourt avec le code suivant, mais je ne sais pas comment faire pour avoir l'année suivante. 

NumSemaine = CInt(Format(Date, "ww", 2))
        Annee = CInt(Format(Date, "yyyy", 2))

.SaveAs base_path & NomFichier & " " & "Espagne Prix Départ" & " S" & NumSemaine & " " & Annee & ".xlsm", FileFormat:=52

Merci pour votre aide. bonne nuit 

Pascal

Utilisateur anonyme · Answer

Annee+1 ne te convient pas ?

--

pascalou83400 · Answer

Bonjour Whismeril,

ha ok tout simplement, je suis novice dans le code, c'est un ami qui m'a ecrit le debut et j'agapte mes besoins pas à pas.
Merci, je vais essayer.
A+
Pascal

pascalou83400 · Answer

bon j'ai ecrit cela :

.SaveAs base_path & NomFichier & " " & "Sicile Prix Franco" & " " & Annee & "-" & Année + 1 & " S" & NumSemaine & " " & ".xlsm", FileFormat:=52

et ca me met 2015-1 , je n'ai pas du tout comprendre le +1.

pascalou83400 · Answer

ha oui Année avec un accent ca ne le fait pas.

Merci Whismeril pour ton aide.

Bonne nuit 

Amicalement.

Pascal

Utilisateur anonyme · Answer

Bonjour, pour l'accent, au temps pour moi, je n'ai pas fait attention que le correcteur d'orthographe me l'avait rajouté.

Ne jamais mettre d'accent dans une variable.

--

pascalou83400 · Answer

Bonjour Whismeril,
non tu n'es pas en cause, c'est moi qui est écrit bêtement année avec l'accent et après mille réflexions je m'en suis aperçu, si j'avais fait un copié collé de ton code cela aurait fonctionné du 1er coup, car tu l'avais bien écrit.

Encore merci pour ton aide.

Bonne journée.

Pascal

Année

6 réponses

Discussions similaires