#N/A integer et string: erreur de compatibilité de types

voila... je test la valeur de cellules dans lesquelles est stockée une formule de calcule (je précise que je ne peux changer les données de la feuille)

Hors la formule peut retourner l'élément
#N/A
je test en fait la valeur par rapport a une autre donnée
donc dans un premier temps je vérifie qu'elle ne soit pas nulle:

Code:

---

1 2 3 4

Do while Cells(ligne,colonne) <> "" ' code ligne = ligne+1 Loop

---

hors si la valeur est #N/A cela génére une erreur d'incompatibilité de type... fait étrange... #N/A n'est pas reconnu en string... mais la valeur Cint(#N/A) en a une

Code:

---

MsgBox Cint(Cells(4:4))

---

cela affiche 2042

Hors... parfois j'ai du texte.... du coup le Cint n'apprécie pas et génére une erreur de type

si je met un val(Cells(ligne,colonne)) je me retrouve avec le meme pb pour le # N/A


brefff je sais plus quoi faire :/

Comment faire une boucle jusqu'a ce que la valeur soit vide sans générer une erreur sur les #N/A et les string


merci

je vais contourner le probleme je pense en utilisant la propriété find:

Code:

---

1 2 3

Cells.Find(What:= ide, After:=ActiveCell, LookIn:=xlFormulas, LookAt:= _ xlWhole, SearchOrder:=xlByColumns, SearchDirection:=xlNext, MatchCase:= _ True, SearchFormat:=False).Activate

---

si quelqu'un a des info sur cette propriété et comment éviter qu'elle s'arrete a la fin de mon tableau.

ah et comment la paramétrer? parcequ'au final elle ne vérifie pas la valeur de la cellule mais la formule a l'interieur

merci

Bonjour,

Fais un test de ce type :

Code:

---

If Not IsError(Cells(ligne,colonne)) Then

---

Encore merci Bigalo.

J'ai finalement laissé tomber la méthode Find... c'est ce qui avait de mieux mais à adapter dans mon cas c'est lourd.

j'édite le titre et je clos ;)