Chiffres ou lettres

XL 2007 VBA bonsoir a tous et toutes, bonsoir forum

Voila comment svp on teste en VBA une VARIABLE qui contient soit du chiffre ou lettre

Exemple if Cel=chiffre then message

Exemple if Cel=lettre then message

un petit code ferai bien mon bonheur en cette fin de Dimanche

Alors merci et bonne soirée a vous

Raymond

Salut le forum

A adapter

Sub essai()
With ActiveCell
If Asc(.Value) > 47 And Asc(.Value) < 58 Then MsgBox "Valeur = 0 à 9"
If Asc(.Value) > 96 And Asc(.Value) < 123 Then MsgBox "Valeur = a à z"
If Asc(.Value) > 64 And Asc(.Value) < 91 Then MsgBox "Valeur = A à Z"
End With
End Sub

Mytå

Bonjour Myta bonjour a tous forum

Merci pour ta reponse mais ce n'ai pas ca

je souhaiterai simplement tester en VBA si une variable par exemple Cel

la variable Cel contient un chiffre 587 par ex

OU

la variable Cel contient un mot dudule par ex

voila c'est tout pour aujourd'hui

merci bien et bonne semaine

raymond

Bonjour,

Si la cellule n'est pas un chiffre tu veux qque cela te dise quoi en retour ?

Amicalement

Dan

Salut le forum

Sub Test_Cellule()
With ActiveCell
If IsEmpty(.Value) Then Exit Sub
If IsNumeric(.Value) Then MsgBox "numérique" Else: MsgBox "alpha"
End With
End Sub

Mytå

Rechercher des sujets similaires à "chiffres lettres"