A
argol
Guest
bonjour a tous,
J'aimerais un ti coup de main sur un morceau de code : morceau de code que j'ai retrouvé dans les archives du forum
j'ai defini la plage a l'initialisation de l'USF
Le probleme est que si on ne trouve pas la valeur, on a bien le bouton Ft1 qui s'affiche mais par contre quand on trouve la valeur, la textbox Int1 ne s'affiche pas par contre le bouton Ft1 disparait bien
J'aimerais un ti coup de main sur un morceau de code : morceau de code que j'ai retrouvé dans les archives du forum
j'ai defini la plage a l'initialisation de l'USF
Code:
If TextBox2.Value = '' Then FT1.Visible = flase
Dim C As Range 'déclare la variable c
'recherche (dans la plage) de la valeur de la TextBox1 : dans les valeurs, critère: mot entier
With plage
Set C = .Find(TextBox2.Value, , , xlWhole) 'définit la variable c)
If C Is Nothing Then 'si recherche infructueuse
FT1.Visible = True And Int1.Visible = False
Else 'sinon
FT1.Visible = False And Int1.Visible = True 'message
End If 'fin condition
End With
Le probleme est que si on ne trouve pas la valeur, on a bien le bouton Ft1 qui s'affiche mais par contre quand on trouve la valeur, la textbox Int1 ne s'affiche pas par contre le bouton Ft1 disparait bien