XL 2019 Problème "#N/A"

[iliess]

bonjour
la colonne J contient des teste et ce symbole d'erreur "#N/A"
dans une boucle j'essaye de localiser ou déterminer les cellule <> "#N/A"
voici ma boucle

For i = 2 To LignB
   If ShGr.Range("J" & i).Value <> "#n/a" Then
            ShGr.Range("M" & k).Value = ShGr.Range("D" & i).Value
            k = k + 1
    End If
Next i

après l'exécution voici le message d'erreur
svp comment ressourdre ce problème.
merci

 

[Compte Supprimé 979]

Bonjour iliess

Comme ceci

 If Not IsError(ShGr.Range("J" & i)) Then

A+

 

[iliess]

bonjour BrunoM45
Merci beaucoup