dans le fichier ci joint je voudrai qu’une fois le textbox1 rempli avec des lettres allant de AA à FF, lettres qui figurent dans l’onglet “ NOMBRES” colonne « B » et que je valide, alors il doit m’ouvrir l’onglet “NOMBRES” et m’afficher en tête de l’onglet la ligne qui correspond aux lettres saisies dans le textbox1.
Private Sub CommandButton1_Click()
Dim Cel As Range
If Me.TextBox1 <> "" Then
With Sheets("NOMBRES")
Set Cel = .Columns(2).Find(Me.TextBox1, LookAt:=xlWhole, MatchCase:=True)
If Not Cel Is Nothing Then Application.Goto Cel, True
End With
End If
Unload Me
End Sub