Outrepasser une erreur...Résolu

Question

Bonjour,

Mon code extrait des donn&#233;es dans des fichiers *.html... Je me serts de la syntaxe html pour "rep&#233;rer" l'approche d'une donn&#233;e &#224; enregistrer...

Lors de l'ex&#233;cution, il arrive (pour qqs fichiers) qu'il y ait une erreur* (syntaxe innatendue dans le fichier html d'o&#249; bug) mais cela n'est pas grave car c'est une int&#233;rruption qui intervient toujours &#224; la fin du fichier en cause donc je voudrais simplement faire un Exit Sub et reprendre le traitement des fichiers...

* Erreur d'ex&#233;cution '62':
   L'entr&#233;e d&#233;passe la fin de fichier
(avec comme choix 'Fin', 'D&#233;bogage' ou 'Aide' mais pas 'Continuer')

Donc, je voudrais faire un test du genre:

If "Erreur d'ex&#233;cution '62'" Then Exit Sub

Et apr&#232;s, le traitement des fichiers continueraient...

Merci d'avance!!!

aieeeuuuuu · Accepted Answer

salut

au debut de ta sub qui traite le fichier, tu mets

public Sub maSub()
On Error Goto Erreur
   .. 
   ...
   'traitement du fichier
   ...
   ...
   Exit sub

Erreur:
   If err.number = 62 then


         Exit sub
   Else
      'La je ne sais pas ce que tu veux faire si il s'agit d'une autre erreur...
      'par exemple :
      Msgbox "Erreur : " & err.description & " num&#233;ro d'erreur :  " & err.number
   end if
end sub

CDAlstom · Answer

Merci!!!!!!!!!!!!!!!! Vraiment!

aieeeuuuuu · Answer

de rien :)

Outrepasser une erreur...

3 réponses

Discussions similaires