Macro excel enregistrement de fichier modifié

Résolu/Fermé
Iama Messages postés 319 Date d'inscription mercredi 13 janvier 2010 Statut Membre Dernière intervention 27 mars 2020 - 27 juin 2010 à 11:00
Iama Messages postés 319 Date d'inscription mercredi 13 janvier 2010 Statut Membre Dernière intervention 27 mars 2020 - 4 juil. 2010 à 15:17
Bonjour,

J'ai fais une macro qui modifie ou crées des fichiers mensuels.
Le nom des fichiers est paramétré par le mois est l'année.

J'arrive à :
- Enregistrer un nouveau fichier dans le dossier d'origine.
- Réenregistrer un nouveau fichier sous un nom existant.

Mon souci est le suivant :

Lorsque je modifie un fichier en changeant dans celui-ci la variable mois ou année,
la macro propose l'enregistrement du fichier sous un nouveau nom.

Si le nom du fichier est existant excel envoie le message : « Le fichier ... existe déjà à cet emplacement. Voulez-vous le remplacer ? »
Lorsque je réponds oui => RAS, mais lorsque je réponds non ça plante.

Est-ce- qu'il y a une solution ?

Une solution style si je réponds non, il faut faire ça ... Me plairait bien (mais je n'arrive pas à trouver la solution si elle existe)

Est-ce quelqu'un pourrait me tuyauter SVP

Iama


A voir également:

1 réponse

Patrice33740 Messages postés 8556 Date d'inscription dimanche 13 juin 2010 Statut Membre Dernière intervention 2 mars 2023 1 775
27 juin 2010 à 22:27
Tu dois ajouter une routine de gestion d'erreur.

Par exemple :

On Error GoTo ErrorHandler
  ThisWorkbook.SaveAs Filename:=Nom_du_nouveau_fichier
On Error GoTo 0

'laisse la suite de ton programme et ajoute à la fin (juste avant End Sub) :

Exit Sub
ErrorHandler:
If Err.Number = 1004 And Err.Description = "La méthode 'SaveAs' de l'objet '_Workbook' a échoué" Then
  Resume Next
Else
  Error Err.Number
  Resume
End If
End Sub
1
Bonjours Patrice33740

Je viens de lire ton message.

Je n'ai pas encore essayé d'utiliser une routine de gestion d'erreur.
Je vais travailler dessus et je te tien au courant.

Grand merci
Iama
0
Iama Messages postés 319 Date d'inscription mercredi 13 janvier 2010 Statut Membre Dernière intervention 27 mars 2020 14
4 juil. 2010 à 15:17
Bonjours Patrice33740

J'ai légerement modifier ton exemple pour l'adapter.

Ca fonctionne, bien que je n'ai pas encore tout compris.

Je te remercie
Iama
0