OVH Cloud OVH Cloud

isnumeric

3 réponses
Avatar
Emcy
bonjour,

pourquoi cette procedure me dis que le texte est un chiffre numérique ? que
faire ?

Sub textNumeric()

Dim MaChaine As String
MaChaine = "12-"

If IsNumeric(MaChaine) Then
MsgBox "chiffre numérique"
End If

End Sub

3 réponses

Avatar
JB
Ce qui commence par un chiffre est considéré comme numérique
Je n'ai pas de solution autre que if right(machaine,1)="-" then


JB
Avatar
Clément Marcotte
Bonjour,

pourquoi cette procedure me dis que le texte est un chiffre numérique ?


Parce que les anglo-saxons aiment bien avoir le moins après les nombres
négatifs et que c'est reconnu comme tel dans VBA



"Emcy" a écrit dans le message de news:
%
bonjour,


Sub textNumeric()

Dim MaChaine As String
MaChaine = "12-"

If IsNumeric(MaChaine) Then
MsgBox "chiffre numérique"
End If

End Sub




Avatar
Emcy
c'est super :((
merci quand même

remarque : ça fait la même chose avec le + ce qui confirme ton explication

"Clément Marcotte" a écrit dans le message
de news: %
Bonjour,

pourquoi cette procedure me dis que le texte est un chiffre numérique ?


Parce que les anglo-saxons aiment bien avoir le moins après les nombres
négatifs et que c'est reconnu comme tel dans VBA



"Emcy" a écrit dans le message de news:
%
bonjour,


Sub textNumeric()

Dim MaChaine As String
MaChaine = "12-"

If IsNumeric(MaChaine) Then
MsgBox "chiffre numérique"
End If

End Sub