Bonjour,
Avec le code ci-dessous je recherche la valeur de la TextBox dans une feuille, si le nombre comprend 5 chiffres le code marche si le nombre comprend 6 chiffres il ne marche plus.
Pouvez-vous me dire la raison ?
Merci pour votre aide.
Avec le code ci-dessous je recherche la valeur de la TextBox dans une feuille, si le nombre comprend 5 chiffres le code marche si le nombre comprend 6 chiffres il ne marche plus.
Pouvez-vous me dire la raison ?
VB:
Private Sub CommandButton1_Click()
Dim N As Integer
Dim L As Integer
Dim i As Integer
If TextBox1 = "" Then Exit Sub
N = TextBox1.Value
For i = 6 To Range("E65536").End(xlUp).Row
If Sheets("Feuil1").Cells(i, 5).Value = N Then
L = i
Rows(i).Select
End If
Next i
Unload Me
End Sub
Merci pour votre aide.