Reconnaissance d'un chiffre

[Fab117]

Salut,
Dans ma macro, je vais tester toutes les cellules de la colonne G (elles peuvent contenir : - Du texte; - des chiffres; - un mélange chiffre texte; - rien). Le but étant que si son contenu n'est pas un chiffre il efface la ligne.
Mais je ne sais pas comment lui indiquer ceci.
Quelqu'un aurait-il la solution ?

If Range("G" & i) <> _____ then


Bonne fin d'après-midi.

Fab

 

[PascalXLD]

Re : Reconnaissance d'un chiffre

Bonjour

if not isnumeric(range("G" & i)) then rows(i).delete

N'oublies pas de boucler à l'envers

 

[jp14]

Re : Reconnaissance d'un chiffre

Bonjour

La fonction Isnumeric permet de vérifier si la valeur est un nombe, si on désire un chiffre( de 0 à 9 ) il faut tester toutes les chiffres en utilisant une boucle

Enregistrement surprise
cf post suivant

 

[jp14]

Re : Reconnaissance d'un chiffre

Bonjour

La fonction Isnumeric permet de vérifier si la valeur est un nombre, si on désire un chiffre( de 0 à 9 ) il faut tester toutes les chiffres en utilisant une boucle

trouve=0
for i = 0 to 9
if valeur = i then
trouve=1
exit for
end if
next i

If trouve=1 then 'on efface


JP

 

[Fab117]

Re : Reconnaissance d'un chiffre

Merci à vous deux et bonne soirée.

Fab