Je perds l' extention de fichier Excel

Résolu
Mistral_13200 -  
Bonjour,

J'urilise le code suivant pour enregistrer un classeur excel :

ActiveWorkbook.SaveAs (chemin & "\" & nomfic & " " & Format(Date, "yyyy")), FileFormat:= _
xlNormal, Password:="", WriteResPassword:="", ReadOnlyRecommended:=False _
, CreateBackup:=False

Mon problème est que j'enregistre bien mon classeur mais sans extention ".xls" .
Quelqu'un peut-il m'aider?
Je précise que je suis avec office 2003.
D'avance merci.
Mistral
Configuration: Windows XP Internet Explorer 7.0

2 réponses

  1.  Farfadet88
    Essaye

    ActiveWorkbook.SaveAs (chemin & "\" & nomfic & " " & Format(Date, "yyyy") & ".xls"), FileFormat:= _
    xlNormal, Password:="", WriteResPassword:="", ReadOnlyRecommended:=False _
    , CreateBackup:=False--
    Ce qui se conçoit bien s'énonce clairement
    0
    1. Mistral_13200 Auteur
      Re,

      Un grand merci à toi, ça marche!

      Mais je dois reconnaître que je ne comprends pas bien pourquoi, car j'ai déjà utilisé cette macro dans d'autres classeurs et je n'ai jamais eu de problèmes.

      Encore un des mystere de l'informatique ou de son environnement?
      En tout cas merci pour ton aide.
      Cordialement.
      Mistral
      0
  2. Farfadet88
    Je ne sais pas non plus. J'ai juste rajouté le ".xls" perdu en route dans ta macro :)
    0