Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel renvoyée un numéro d'erreur

renvoyée un numéro d'erreur

4 réponses
Avatar
cm
bonjour
j'aimerai savoir comment renvoyer le numéro d'erreur généré suite a
l'execution d'un code vba....
cette erreur n'est pas un bug pur et dur (par ex un selection.find what qui
n'aboutit a rien puisque la donnée n'est pas renseignée dans les cellules
excel)
en fait je peux avoir 2 types d' erreur et j'aimerai donc faire une
instructions différentes pr les deux types donc j'ai besoin de savoir le
nuémro d'erreur généré...
merci bcp de vos réponse et bonne journée
a+
Signaler un problème avec ce contenu

4 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
LSteph
Bonjour,
rien n'indique que tu as lu ton fil d'hier
qui te fournit déjà des éléments de réponse et même des solutions.

LSteph
(fini par croire que c'est wanadoo qui ...)
"cm" a écrit dans le message de news:
42a2f15e$0$15576$
bonjour
j'aimerai savoir comment renvoyer le numéro d'erreur généré suite a
l'execution d'un code vba....
cette erreur n'est pas un bug pur et dur (par ex un selection.find what
qui n'aboutit a rien puisque la donnée n'est pas renseignée dans les
cellules excel)
en fait je peux avoir 2 types d' erreur et j'aimerai donc faire une
instructions différentes pr les deux types donc j'ai besoin de savoir le
nuémro d'erreur généré...
merci bcp de vos réponse et bonne journée
a+



Avatar
cm
bonjour
j'ai bien lu le fil d'hier mais je ne trouve pas la réponse
je ne suis pas habitué a utiliser les erreurs dans le code et gérer ces
"erreurs" par macro
j'ai fait le test suivant : j'ai placé dans une cellule de la colonne a la
valeur 15 ma msgbox est tt de même activé alors que la recherche aboutit et
qu'aucune erreur n'est généré ....ce que je ne comprend pas
j'ai peut être fait une erreur ??
merci de votre aide

Sub test()
Columns(1).Select
On Error Resume Next
'avant la partie concernée

Selection.Find(What:="15", After:¬tiveCell, LookIn:=xlFormulas, LookAt
_
:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext,
MatchCase:= _
False, SearchFormat:úlse).Activate
'lorsque c'est le code qui volontairement provoque l'erreur
'ne pas oublier de mettre

' après instructions
On Error GoTo errhandler
errhandler:
MsgBox "la recherche du code n'aboutit pas"
Exit Sub

End Sub

"LSteph" a écrit dans le message de news:
%
Bonjour,
rien n'indique que tu as lu ton fil d'hier
qui te fournit déjà des éléments de réponse et même des solutions.

LSteph
(fini par croire que c'est wanadoo qui ...)
"cm" a écrit dans le message de news:
42a2f15e$0$15576$
bonjour
j'aimerai savoir comment renvoyer le numéro d'erreur généré suite a
l'execution d'un code vba....
cette erreur n'est pas un bug pur et dur (par ex un selection.find what
qui n'aboutit a rien puisque la donnée n'est pas renseignée dans les
cellules excel)
en fait je peux avoir 2 types d' erreur et j'aimerai donc faire une
instructions différentes pr les deux types donc j'ai besoin de savoir le
nuémro d'erreur généré...
merci bcp de vos réponse et bonne journée
a+







Avatar
LSteph
Re,
Ok!
dans ces cas là refais un pti
coucou merci
bonjour
mais c'est gentil mais
cela ne fonctionne pas ou j'ai pas compris tout

;-)
...le exit sub se met avant le errorhandler:

@+

lSteph
"cm" a écrit dans le message de news:
42a2fa85$0$11698$
bonjour
j'ai bien lu le fil d'hier mais je ne trouve pas la réponse
je ne suis pas habitué a utiliser les erreurs dans le code et gérer ces
"erreurs" par macro
j'ai fait le test suivant : j'ai placé dans une cellule de la colonne a la
valeur 15 ma msgbox est tt de même activé alors que la recherche aboutit
et qu'aucune erreur n'est généré ....ce que je ne comprend pas
j'ai peut être fait une erreur ??
merci de votre aide

Sub test()
Columns(1).Select
On Error Resume Next
'avant la partie concernée

Selection.Find(What:="15", After:¬tiveCell, LookIn:=xlFormulas,
LookAt _
:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext,
MatchCase:= _
False, SearchFormat:úlse).Activate
'lorsque c'est le code qui volontairement provoque l'erreur
'ne pas oublier de mettre

' après instructions
On Error GoTo errhandler
errhandler:
MsgBox "la recherche du code n'aboutit pas"
Exit Sub

End Sub

"LSteph" a écrit dans le message de news:
%
Bonjour,
rien n'indique que tu as lu ton fil d'hier
qui te fournit déjà des éléments de réponse et même des solutions.

LSteph
(fini par croire que c'est wanadoo qui ...)
"cm" a écrit dans le message de news:
42a2f15e$0$15576$
bonjour
j'aimerai savoir comment renvoyer le numéro d'erreur généré suite a
l'execution d'un code vba....
cette erreur n'est pas un bug pur et dur (par ex un selection.find what
qui n'aboutit a rien puisque la donnée n'est pas renseignée dans les
cellules excel)
en fait je peux avoir 2 types d' erreur et j'aimerai donc faire une
instructions différentes pr les deux types donc j'ai besoin de savoir le
nuémro d'erreur généré...
merci bcp de vos réponse et bonne journée
a+











Avatar
LSteph
.. j'oubliais
Fredo te l'a dit: err.number

mais le numéro est indiqué dans le message d'erreur.. si
dans un premier temps quand tu fais ton code ne mets pas de On error..
comme cela tu sauras tous les endroits où il faut soit corriger
soit prévoir.
@+

lSteph

"cm" a écrit dans le message de news:
42a2fa85$0$11698$
bonjour
j'ai bien lu le fil d'hier mais je ne trouve pas la réponse
je ne suis pas habitué a utiliser les erreurs dans le code et gérer ces
"erreurs" par macro
j'ai fait le test suivant : j'ai placé dans une cellule de la colonne a la
valeur 15 ma msgbox est tt de même activé alors que la recherche aboutit
et qu'aucune erreur n'est généré ....ce que je ne comprend pas
j'ai peut être fait une erreur ??
merci de votre aide

Sub test()
Columns(1).Select
On Error Resume Next
'avant la partie concernée

Selection.Find(What:="15", After:¬tiveCell, LookIn:=xlFormulas,
LookAt _
:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext,
MatchCase:= _
False, SearchFormat:úlse).Activate
'lorsque c'est le code qui volontairement provoque l'erreur
'ne pas oublier de mettre

' après instructions
On Error GoTo errhandler
errhandler:
MsgBox "la recherche du code n'aboutit pas"
Exit Sub

End Sub

"LSteph" a écrit dans le message de news:
%
Bonjour,
rien n'indique que tu as lu ton fil d'hier
qui te fournit déjà des éléments de réponse et même des solutions.

LSteph
(fini par croire que c'est wanadoo qui ...)
"cm" a écrit dans le message de news:
42a2f15e$0$15576$
bonjour
j'aimerai savoir comment renvoyer le numéro d'erreur généré suite a
l'execution d'un code vba....
cette erreur n'est pas un bug pur et dur (par ex un selection.find what
qui n'aboutit a rien puisque la donnée n'est pas renseignée dans les
cellules excel)
en fait je peux avoir 2 types d' erreur et j'aimerai donc faire une
instructions différentes pr les deux types donc j'ai besoin de savoir le
nuémro d'erreur généré...
merci bcp de vos réponse et bonne journée
a+