Je suis en train de faire un bouton suivant et précédent pour afficher sur les zones de texte si j'ai plus d'un de la même valeur avec ce code, je ne peux obtenir la dernière valeur neGet suivante ou précédente valeur
Set sh = ThisWorkbook.Sheets("Outage")
With sh
For i = 1 To 50
If (InStr(1, Cells(i, 6), UserForm1.TextBox4.Text, vbTextCompare) > 0) Then
outage.TextBox1.Text = .Cells(i, 1)
outage.TextBox2.Text = .Cells(i, 3)
outage.TextBox9.Text = .Cells(i, 6)
outage.TextBox3.Text = .Cells(i, 9)
outage.TextBox4.Text = .Cells(i, 10)
outage.TextBox5.Text = .Cells(i, 11)
outage.TextBox6.Text = .Cells(i, 14)
outage.TextBox7.Text = .Cells(i, 15)
outage.TextBox8.Text = .Cells(i, 16)
End If
Next
End With
ce que je dois faire est de montrer la 1ère valeur et si la presse va à côté de la prochaine même valeur entrée dans la boîte de texte formulaire utilisateur 4
Il est pas clair ce que vous signifier. S'il vous plaît clarifier ce que vous voulez dire et peut-être inclure une capture d'écran du formulaire d'utilisateur et/ou de la feuille de calcul afin que vous puissiez obtenir l'aide dont vous avez besoin –