Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

Message ss condition

2 réponses
Avatar
IMER09
Bonjour a tous

J'ai ce qui suit

Private Sub ComboBox1_Change()
If ComboBox1.Value > "50000,00" Then
MsgBox "ATTENTION VALEUR SAISIE SUPERIEUR A 50000!", vbExclamation, _
"ERREUR ... VERIFIER SVP !"
End If
End Sub

Qd je tappe 51 j'ai deja le Message
Comment faire?
Merci

--
IMER09

2 réponses

Avatar
michdenis
if cdbl(ComboBox1.Value) > 50000 Then



"IMER09" a écrit dans le message de news:

Bonjour a tous

J'ai ce qui suit

Private Sub ComboBox1_Change()
If ComboBox1.Value > "50000,00" Then
MsgBox "ATTENTION VALEUR SAISIE SUPERIEUR A 50000!", vbExclamation, _
"ERREUR ... VERIFIER SVP !"
End If
End Sub

Qd je tappe 51 j'ai deja le Message
Comment faire?
Merci

--
IMER09
Avatar
IMER09
MERCI michdenis C'EST PARFAIT
--
IMER09


"michdenis" wrote:

if cdbl(ComboBox1.Value) > 50000 Then



"IMER09" a écrit dans le message de news:

Bonjour a tous

J'ai ce qui suit

Private Sub ComboBox1_Change()
If ComboBox1.Value > "50000,00" Then
MsgBox "ATTENTION VALEUR SAISIE SUPERIEUR A 50000!", vbExclamation, _
"ERREUR ... VERIFIER SVP !"
End If
End Sub

Qd je tappe 51 j'ai deja le Message
Comment faire?
Merci

--
IMER09