Discussion :

[Laugeek]

Bonjour,

J'effectue une annalyse de cellules contenant des fonction RECHERCHEV a l'aide de macro vba.
mon objectif est de trouver dans ces cellules, celles qui contiennent l'erreur #N/A afin d'effacer la valeur contenue par la suite.

Comment puis je "lire" cette cellule avec un algo vb du style

Si cellule = "#N/A" alors
cellule.value=""
fin si

merci

[Pierre Fauconnier]

Bonjour et bienvenue sur nos forums.

Tu peux utiliser les fonctions de feuille de calcul reprises dans application.worksheetfunction, par exemple comme ceci:

Code :

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

1
2
3
4
5
    Dim Cellule As Range
 
    For Each Cellule In Range("a1:a10")
        If Application.WorksheetFunction.IsNA(Cellule) Then MsgBox Cellule.Address & " est NA"
    Next

[Laugeek]

Ayant trouvé une autre solution je la fais partager:

Code :

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

1
2
3
If (Cells(i, 24).Errors.Item(xlEvaluateToError).Value = True) Then
            Cells(i, 24).Value = ""
End If

[Pierre Fauconnier]

Attention que le code que tu donnes videra aussi la cellule sur d'autres erreurs que #N/A...

A toi de voir...