Trouver les messages d'erreur : "#VALEUR!" et #DIV/0! en VBA

Bonjour Amar Lacheheb,
Tout simplement avec la méthode FIND :
Set ERREUR_DIV0 = Cells.Find(What:="#DIV/0!")
Set ERREUR_VALUE = Cells.Find(What:="#VALEUR!")

Corto

Amar Lacheheb a écrit :

Bonjour,

Je cherche à trouver à l'aide d'une procédure vba les messages d' erreurs :

"#VALEUR!" et #DIV/0! , dans un classeur,

Merci d'avance pour votre aide.

Merci
"Corto" <fcdirckx@hotmail.com> a écrit dans le message de news:
%23jSQuZaEJHA.4840@TK2MSFTNGP06.phx.gbl...
Bonjour Amar Lacheheb,
Tout simplement avec la méthode FIND :
Set ERREUR_DIV0 = Cells.Find(What:="#DIV/0!")
Set ERREUR_VALUE = Cells.Find(What:="#VALEUR!")

Corto

Amar Lacheheb a écrit :

Bonjour,

Je cherche à trouver à l'aide d'une procédure vba les messages d'erreurs :

"#VALEUR!" et #DIV/0! , dans un classeur,

Merci d'avance pour votre aide.

Bonsoir,
Esaie cette proc
Sub Macro1()
Selection.SpecialCells(xlCellTypeFormulas, 16).Select
MsgBox Selection.Address
Debug.Print Selection.Address 'Cette commande imprime dans la fen^tre
d'execution VBA
'ou Msgbox Selection.Address
End Sub

--
Cordialement
jpmonnier-no-spam@neuf.fr
"Amar Lacheheb" <amar.lacheheb@bipe.fr> a écrit dans le message de
news:ga2j32$47c$1@writer.imaginet.fr...

Bonjour,

Je cherche à trouver à l'aide d'une procédure vba les messages d'erreurs :

"#VALEUR!" et #DIV/0! , dans un classeur,

Merci d'avance pour votre aide.