Bonjour à tous,
Je suis en train de créer une userform qui reprend dans des textbox les lignes d'un tableau dans excel et je voudrais valider le passage de ligne en ligne en clickant sur le bouton ok de la userform.
Mais je ne vois pas comment utiliser la condition sur le bouton ok.
Le code que je souhaiterais faire doit resembler a quelque chose comme le code en dessous.
Merci de me donner un petit coup de pouce.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15 Private Sub UserForm_Initialize() Dim i As Integer For i = 5 To Range("D65536").End(xlUp).Row tb_ref.Value = Cells(i, 3).Value tb_desi.Value = Cells(i, 4).Value tb_nb.Value = Cells(i, 5).Value tb_long.Value = Cells(i, 7).Value tb_larg.Value = Cells(i, 8).Value tb_ep.Value = Cells(i, 9).Value tb_nb_mb.Value = (Cells(i, 5).Value / Cells(i, 6).Value) If cb_ok.Click Then Next i Application.Calculate End Sub
Partager