VBA : Vérifier si le n° de compte est au format numérique

Bonjour à tous,

J'essaie, par le biais d'une macro, de vérifier qu'une cellule (avant de l'ajouter dans une liste) est bien un nombre sur 10 chiffres (entier)...

Dans un premier temps, je teste si le contenu de la cellule est numérique :

    If Not IsNumeric("J6") Then
       MsgBox ("Numéro de compte n'est pas numérique")
       Exit Sub
       End If

Que la cellule J6 soit remplie avec des lettres, des chiffres ou caractères alphanumériques, j'ai toujours le message me disant que le compte n'est pas numérique... :(
. Y'a quelque chose que je ne comprends pas.

Ensuite je teste le nombre de caractères de la cellule (qui doit être sur 10 chiffres) :

    ' Vérifier que le n° de compte soit sur 10 chiffres
    If Len("J6") <> 10 Then
        MsgBox ("Le n° de compte doit être sur 10 chiffres")
        Exit Sub
        End If

La vérification me renvoie "toujours" le message d'erreur, même lorsque le nombre est sur 10 chiffres... :/

Bizarre,

Joe

bonjour

la syntaxe est range("J6") pour adresser la cellule J6. donc len(range("J6")) et isnumeric(range("J6"))

Bonjour h2so4,

Merci... ! J'ai les yeux qui piquent à force et je perds la boule !

Désolé pour un dérangement aussi... idiot !

Joe.