Jérôme, 

Vous pouvez essayer ceci :

annee = ToString(DateYear(DernierJourPeriode))
mois  = "00" + ToString(DateMonth(DernierJourPeriode))
mois = Mid(mois, StrLen(mois)-1, 2)
   

resultat = resultat + "Salaire" +" " + annee + "-" + mois + ";"    

Bien à vous, 

Rachid

Merci RACHID. J’ai essayé cela me change le nom du fichier excel mais ce n’est pas exactement ce que je souhaites.

Dans l’une des colonnes de ce fichier excel qui s’intitule LI_PIECE je souhaiterai avoir pour chaque ligne un texte fixe que vous m’avez très bien conseillé resultat + "Salaire" +" " + annee + "-" + mois + ";" 

Je dois rater un truc quelque part, désolé.