Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Tester si une variable est numérique.

Luminou

XLDnaute Junior
Bonjour,
Voila je n'arrive pas trouver une facon de tester si la variable encoder dans une combobox est bien numérique.

voila mon petit morceaux de code:
Code:
Private Sub ComboBox1_Change()
Dim a As String
Dim b As Double

a = ComboBox1.Value
If ComboBox1.Value Is Nothing Then
Exit Sub
End If
If ComboBox1.Value Is numerique Then
    b = CDbl(Replace(a, ".", ","))
    Else
End If
Me.Range("H5") = b

End Sub


Il me marque une erreur "objet requit"

Merci d'avance pour vos réponse.

Lumi
 

fifi

XLDnaute Occasionnel
Re : Tester si une variable est numérique.

salut
j'aurais plutot essayer de faire le test comme cela :

If isnumeric(ComboBox1.Value) = true Then ...


mais est-ce que toutes valeurs mises dans le combobox n'est pas automatiquement convertie en string?


++
 

skoobi

XLDnaute Barbatruc
Re : Tester si une variable est numérique.

Bonjour,

Nothing est réservé au "objet", regarde l'aide.

If ComboBox1.Value = "" Then

et pour savoir si la variable est numérique:

If IsNumeric(ComboBox1.Value) Then

PS: oupppsss, collision, bonjour fifi
 

Discussions similaires

Réponses
1
Affichages
273
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…