Discussion :

[bakman]

Bonjour à tous je souhaiterais ne pas afficher une erreur style "erreur de compilation" qui est levé à partir d'un fichier que j'ouvre à partir d'une macro depuis un autre fichier.
J'ai rajouter dans ma macro :

Code :

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

1
2
3
 
Application.DisplayAlerts = False
Application.Workbooks.Open(monfichier)

mais ce dernier en s'ouvrant m'affiche toujours l'erreur.
Comment puis-je procéder?

Merci

[Psychopathe]

Il faut gérer les interceptions d'erreur avec un On Error Goto par exemple...

http://silkyroad.developpez.com/VBA/GestionErreurs/

[bakman]

Merci de répondre aussi vite! Mais l'erreur est générer depuis le fichier que je souhaite ouvrir donc si je fait un OnErrorGoto, l'erreur dans le code qui ouvre le fichier corrompu n'est pas levé.
Pour mieux m'expliquer je fait une macro de gestion des fichiers corrompus:
Si un fichier est corrompu j'exécute une macro qui se trouve dans un fichier qui est prévu à cet effet et qui à pour but de supprimer les modules et de les réinjecter dans le fichier corrompu.
Je souhaite donc à l'ouverture de mon fichier excel depuis mon fichier restore qui ne me leve pas les erreurs ou du moins qui ne me les affiche pas.

[Psychopathe]

Avec quelle commande l'erreur apparait-elle? Avec un Open? Es-ce que l'erreur apparait parce que le fichier corrompu exécute du code à son lancement?

[bakman]

oui l'erreur est générer pars ce que le fichier corrompu exécute du code à son lancement vba lève une erreur sur la première ligne du code du fichier corrompu

Code :

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

1
2
 
Priva With Range(Cells(etc..

[bakman]

Code :

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

Application.enableEvents = False

Effectivement

Oui sa foncitonne à présent
Merci à tout les deux !!

[pgz]

Bonjour.

As-tu pensé à empêcher l'exécution des procédures évènementielles, avant d'ouvrir le classeur douteux?

Code :

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

Application.enableEvents = False

Cordialement,

PGZ