Bonjour,
je suis un tuto et dés le début je plante "Erreur 348"
Je joint le fichier qui m'énerve.
Merci de votre réponde et d'épargner mon ignorance
Cordialement
Version imprimable
Bonjour,
je suis un tuto et dés le début je plante "Erreur 348"
Je joint le fichier qui m'énerve.
Merci de votre réponde et d'épargner mon ignorance
Cordialement
Bonjour
il y a 2 ou 3 erreurs dans ce code
Le code devrait être placé sur le CommandButton1_Click
Le nom utilisé pour la textbox est faux (dans le fichier c'est TextBox1, dans le code Textbox1_recherche)
Le code pour la message box ne doit pas contenir de =
Au final il faudrait avoir
Code:
1
2
3
4
5
6
7
8
9
10 Private Sub CommandButton1_Click() If Sheets("Feuil1").TextBox1.Value = "" Then MsgBox "vide" Else MsgBox "pas vide" End If End Sub
Super
Merci de ta réponse Fab_de_chez_PERFORM
Cela fonction, je ne voyais pas l'évidence.
:calim2:Plus on cherche moins on trouve
Bonne fin journée
Cordialement