Test type de données

Bonjour, j'ai une question qui port également sur la notion de valeurs de cellule.
Je m'incruste mais ca m'embête de faire un sujet pour cette question:

suite à la discussion : http://www.developpez.net/forums/d15...e/#post8389855

Comment fait-on pour dire en vba:
- si il y a une valeur numérique, alors ......
-si il y a une valeur texte, alors.


Le #N/A n'étant pas reconnu, je ne vois pas de quel fonction je peux me servir...

Code:

---

if cells(1,"A").text="#N/A" then msgbox "Err"

---

pour le test numerque

Code:

---

if isnumeric(tavaleur) then

---

pour le test string et bien c'est le contraire

Code:

---

if not isnumeric(tavaleur) then

---

pour le test NA(erreur)

Code:

---

if iserror(cells(x,y)) then

---

et pour diférencier unevaleur string d'une erreur

Code:

---

if not iserror(cells(x,y)) and not isnumeric(cells(x,y)) then

---

c'est bon je crois que tu a tout la

Bonjour latop,

Pour savoir si une valeur est numérique en VBA tu peux utiliser la function IsNumeric qui retourne un booléen (donc True si la valeur est numérique et False si elle ne l'est pas)

Code:

---

1 2 3 4 5 6 7 8

Dim valeurATester As Variant Dim reponseDuTest As Boolean valeurATester = "10" reponseDuTest = IsNumeric(valeurATester ) 'reponseDuTest est True valeurATester = "hello world" reponseDuTest = IsNumeric(valeurATester ) 'reponseDuTest est False

---

J'utilise le type Variant pour la valeur à tester car le type variant peut contenir n'importe quelle type de donnée.

Tu peux donc te servir de cette fonction pour savoir si c'est du texte ou du numérique.

Tu peux aussi l'allier à IsDate (qui fonctionne pareil) mais qui renvoie un booléen si la valeur est de type Date ou non.


J'espère avoir compris ta question et donc y avoir bien répondu.


EDIT : patricktoulon a été plus rapide

eh ben c'est nickel, ca marche

merci à vous