Initialiser textBox_Erreur

Bonjour,

J'aimerai pouvoir via un Bouton initialiser les valeurs de toutes les TextBox sauf celles de la Date et du champ recherche. J'arrive a toutes les effacer mais je trouve par la syntaxe pour éviter les 2.

Pouvez-vous me dire comment faire pour passer outre une erreur d'exécution du code (exemple s'il y a une cellule vide dans la colonne) afin d'éviter de devoir faire une réinitialisation manuelle du code, la signaler via une invite mais la réinitialiser soit automatiquement soit via un Bouton.

En vous remerciant,

Pilougne

Bonjour Pilougne, bonjour le forum,

Essaie comme ça :

Private Sub CommandButtonRazTextBox_Click()
'Raz de toutes les textbox
Dim TBox As Control 'Declaration Control (déclaré dans module).
For Each TBox In Me.Controls ' pour tout les controles
    If TypeName(TBox) = "TextBox" Then
        Select Case TBox.Name
            Case "TextBoxDate", "TextBox_Recherche" 'rien ne se passe
            Case Else
                TBox.Text = "" ' si le type de l'objet est une textbox alors raz de sa valeur.
        End Select
    End If
Next TBox
End Sub

Bonjour ThauTheme,

Merci c’est exactement ce que je cherchais.

Auriez-vous une idée au niveau du traitement de l’erreur.

Merci et bonne journée

Re,

Pour la date tu pourrais, au bouton de validation :

With Me.TextBoxDate
     If IsDate(.Value) = False then
          .SetFocus
          .SelStart=0
          .SelLength = Len(.Value)
          Exit Sub
     End if
End With

Bonjour,

Merci pour ton aide.

Le but que je recherche c’est d’éviter a l’utilisateur d’aller réinitialiser le code via la console Vba lors d’un blocage du code. Je ne sais pas si on peut lors d’une erreur passer outre, ne pas exécuter le code et le réinitialiser ?

Merci encore et bonne journée

Re,

Dans ce cas début du code :

On Error GoTo fin 'première ligne de code en-dessous du: Sub Macro1()
fin:'dernière ligne de code avant le :  End Sub

Mais après quand ça ne marche pas on ne sait plus pourquoi...

Bonjour,

je sais c'est un peu le problème mais je préfère que l’utilisateur signale le problème et qu’il puisse continuer a travailler sur le projet que bloquer le code.

Je te remercie et bon week-end

Pilougne