Sujet Précédent Sujet Suivant

Obligation de remplir une Textbox lorsque OptionButton coché

Résolu/Fermé
Momo - 31 mars 2023 à 16:50
yg_be Messages postés 22752 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 3 mai 2024 - 31 mars 2023 à 19:20

Bonjour,

Quel code je dois mettre dans l'évènement CommandButton1_Click() si je veux bloquer (exit sub) si Textbox1 n'est pas rempli si Option Button coché ? 

Tout ça se trouve vous l'aurez compris dans 1 Userform 

J'ai essayé ça mais ça ne fonctionne pas, ça bloque sur  ".Len (TextBox1) > 0"

Private Sub CommandButton1_Click()
With OptionButton1
If OptionButton1.Value = True Then
.Len (TextBox1) > 0
MsgBox ("message")
Exit Sub
Else
End If
End With

etc ...

Merci


Windows / Chrome 111.0.0.0

4 réponses

Réponse 1 / 4
yg_be Messages postés 22752 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 3 mai 2024 1 477
31 mars 2023 à 17:17

bonjour,

et sans le point?
0
Réponse 2 / 4
Momo
31 mars 2023 à 18:06

Bonjour, 

alors là j'ai tout de suite une boite de dialogue "attendu :Identificateur" à la compilation
0
yg_be Messages postés 22752 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 3 mai 2024 1 477
31 mars 2023 à 19:06

Je regarde mieux le code.  Qu'essaies-tu de faire?  Peut-être ainsi:

Private Sub CommandButton1_Click()
If OptionButton1.Value and Len (TextBox1) > 0 then
    MsgBox ("message")
    Exit Sub
End If
' ...
0
Réponse 3 / 4
Momo
31 mars 2023 à 19:04

Bon qui cherche trouve ... j'ai pas mal cogité et trouvé la solution : 

With OptionButton1.Value = True
If Me.TextBox1 = "" Then
MsgBox ("Message")
Exit Sub
Else
End If
End With
 

Si ça peut servir à qqun 1 jour ;)
0
yg_be Messages postés 22752 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 3 mai 2024 1 477
31 mars 2023 à 19:20

Ce with me semble bizarre.  Tant mieux si il fonctionne!

0
Réponse 4 / 4
Momo
31 mars 2023 à 19:08

Pardon yg_be je n'avais pas vu ta réponse 

Merci pour l'aide !
0

Discussions similaires

code couleur associé a une image
magic charly -
pandora -

9 réponses
Remplir une cellule (texte) en fonction d'une autre (texte).
SOMUM -
SOMUM -

4 réponses
Whatsapp sur Iphone : supprimer un message avant réception
marrakchia -
valou -

8 réponses
exo pix
Xtyller -
Raymond PENTIER -

2 réponses
Messenger : que veut dire le rond gris coche blanche ?
ValrieSIARRAS -
Ciro -

11 réponses