ShanaBurns
Messages postés30Date d'inscriptionmardi 19 mars 2002StatutMembreDernière intervention30 mai 2003
-
5 avril 2002 à 18:18
TFlorian
Messages postés194Date d'inscriptiondimanche 3 mars 2002StatutMembreDernière intervention19 décembre 2005
-
5 avril 2002 à 19:57
Bonjour, je cherche comment faire pour obtenir la ligne de la derniere erreur.
Pour pouvoir faire un goto sur cette ligne la. pour reesayer.
P.S.: Ne me dit pas de faire une boucle ou une etiquette...car je peux pas vraiment.. a moins que vous sachiez comment faire pour que l'étiquette puisse etre dinamyque style..
l'etiquette dans une sub.....
puis dans une autre sub...
y a le goto.. sur une étiquette ou ligne qui elle varie selon de ou a été appeller la sub.
TFlorian
Messages postés194Date d'inscriptiondimanche 3 mars 2002StatutMembreDernière intervention19 décembre 20053 5 avril 2002 à 19:57
Bonjour,
la solution que je peut de proposer est la suivente :
On Error GoTo Bug
'ton code ici ...
Exit Sub
Bug:
Msg = "L’erreur # " & Str(Err.Number) & _
" a été générée par " _
& Err.Source & Chr(13) & Err.Description
MsgBox Msg, , "Erreur", Err.HelpFile, Err.HelpContext
doevents
Resume
en fait tu utilise l'instuction resume liee avec un break point sur le doevents et appres en pas a pas il te renvois sur la ligne qui a generee l'erreur ;-)