Ilino
XLDnaute Barbatruc
Forum buon anno
je souhaite a simplifier le code ci-dessous
GRAZIE PAR AVANCE
EDIT: ci dessous un code presque ce que je cherche pour controler les TextBox avant la validation (grazie ROBERT )
mais il se bloque a ce niveau :
avec un message d'erreur d'execution 438
Propriété ou méthode non gérée par cet objet
GRAZIE
je souhaite a simplifier le code ci-dessous
Code:
If TextBox1.Value = "" Then
Label9.Visible = True
Exit Sub
End If
If TextBox2.Value = "" Then
Label11.Visible = True
Exit Sub
End If
If TextBox4.Value = "" Then
Label12.Visible = True
Exit Sub
End If
If TextBox3.Value = "" Then
Label13.Visible = True
Exit Sub
End If
If TextBox5.Value = "" Then
Label14.Visible = True
Exit Sub
End If
EDIT: ci dessous un code presque ce que je cherche pour controler les TextBox avant la validation (grazie ROBERT )
PHP:
Private Sub CommandButton1_Click() 'bouton de commande de validation de l'UserForm
Dim ctrl As Control 'déclare la variable ctrl
For Each ctrl In Me.Controls 'boucle sur tous les contrôles de l'userform
If TypeOf ctrl Is MSForms.TextBox And ctrl.Value = "" Then 'condition : si le type de contôle est une Textbox et si elle est vide
ctrl.SetFocus 'place le curserur dans la Textbox
MsgBox "Vous devez éditer ce champs !" 'message
End If 'fin de la condition
Next ctrl 'prochain contrôle de l'userform
End Sub
PHP:
If TypeOf ctrl Is MSForms.TextBox And ctrl.Value = "" Then 'condition : si le type de contôle est une Textbox et si elle est vide
Propriété ou méthode non gérée par cet objet
GRAZIE
Pièces jointes
Dernière édition: