Discussion :

[alsimbad]

je crée un fichier par vba a partir d'exel 2007 (save as) et je veux l'enregistrer sous format compatible excel2003. j'ai bien trouvé le

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 
    ActiveWorkbook.SaveAs Filename:= _
        chemin & nom, FileFormat:=xlExcel8

pas de pb donc pour creer le fichier dans le bon format, mais excel 2007 detecte le format et envoie un message de confirmation pour le format, que je voudrais éviter. j'ai essayé

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Application.EnableEvents = True

mais ça ne marche pas
donc hypothese1, je me goure avec mon

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Application.EnableEvents = True
    ActiveWorkbook.SaveAs Filename:= _
        chemin & nom, FileFormat:=xlExcel8

(évidement sinon, je demanderai pas
hypothese 2 cette commande ne fais pas le meme effet sous 2007
et hypothese 3, a l'instar de getopenfilename, cette comande n'existe pas sous 2007.
si qqun a une solution a m'apporter, je le remercie d'avance.
pour info, le but de la manoeuvre est d'envoyer un fichier sans macro a un organisme, . je le crée, je copie juste la feuille concernée dans un nouveau classeur, je fais un saveas. la manip est simple, mais je ne sais comment éviter cette confirmation de format
je sais que l'on peut cocher la case pour ne pas qu'il verifie au prochain enregistrement, mais le code fais qu'il crée un fichier a chaque fois, il n'y a donc pas de prochain enregistrement

[edelweisseric]

Bonsoir à tous
Bonsoir alsimbad

Je viens d'essayer plusieurs fois, avec 2007, et tout se passe bien : pas de message de confirmation, mais point important peut être (?) , la macro .....excel8.... est dans le fichier à enregistrer.

La manip serait juste de copier cette macro d'enregistrement dans le fichier nouvellement créé .....

Eric

[Bigalo]

Bonsoir,

Si tu veux éviter les messages intempestifs, c’est DisplayAlerts qu’il faut utiliser, pas EnableEvents, destiné à bloquer ou non les procédures événementielles !

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Sub AZ()
    Application.DisplayAlerts = False
    ActiveWorkbook.SaveAs chemin & nom, xlExcel8
    Application.DisplayAlerts = True
End Sub

Cordialement,

Michel Gaboly

[ucfoutu]

Bonsoir,

Une lecture qui t'aidera peut-être :

http://groups.google.com/group/micro...2576ab07aac412

[alsimbad]

pfutt, je me sens vraiment tout bete avec mon

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Application.EnableEvents = True

la bonne réponse est bien sur celle de Bigalo

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Application.DisplayAlerts = False

que je remercie bien sur, mais également tout le monde. désolé de vous avoir mobilisé pour un truc si simple, mais je faisais une fixette.
merci tout le monde

[Bigalo]

Rassure-toi, cela arrive à tout le monde de partir sur une mauvaise piste sans rien soupçonner