bonjours à tous
j'apporte une bonne nouvelle, la soluce de Shinning Hawk concernant le nom du fichier avec la date, fonctionne parfaitement et correspond exactement à ce que je souhaitais obtenir. donc je n'aiqu'une chose à dire merci à tous, car vous êtes plusieurs à m'avoir aidé et orienté sur cette 'histoire' de Format (dans le VBA), petit plus pour shinning Hawk pour m'avoir pratiquement (même complétement) écrit la ligne de code type.
j'ajouterai une petite correction sur les 'petits bouts de trucs qui pourraient me servir)
puisque dans la ligne de code type:
nom_fic = \\'C:/TEMP/nomfichier\\' & Format(Day(Range(\\'B4\\').Value), \\'00\\') &
Format(Month(Range(\\'B4\\').Value), \\'00\\') & Right(Year(Range(\\'B4\\').Value), 2) & \\'.xls\\'
on fait déja référence à un répertoire, la ligne de code
ChDir 'nom du répertoire' devient caduque (est ce que je me trompe) car je l'ai éffectivement inclus dans ma procédure, seulement elle n'est pas pris en compte, le fichier s'enregistre dans le répertoire ou le fichier modéle est installé.
deuxiéme chose, concernant la petite procédure pour mettre le fichier en lecture seule.
je ne l'ai pas utilisé, car elle est indirectement inclus dans ma procédure:
ActiveWorbook.SaveAs Filename:=Nomfichier,FileFormat:=xlNormal,Password:='',
WriteResPassword[/u]:='toto',ReadOnlyRecommended:=False,CreateBackup:=False
par contre comment inclure un méssage (MsgBox) d'érreur pour l'utilisateur qui éssaie quand même d'enregistrer lorsque le fichier est en lecture seule, car pour l'instant je n'ai que le son systeme de windows qui me prévient (sauf que au boulot la plus part des PC n'on pas de HP)