Quelqu'un pourrait m'expliquer cette partie de code récupéré sur un exemple
:
Private Sub CmdValider_click()
Dim Ligne%, Colonne%, y$
If Me.ComboBox1 = "test" then Colonne = 1
....
With Sheets(x)
For i = To .Cells(Rows.Count, 1).End(xlUp).row
If .Cells(i, 3).Text = y then
Ligne = .Cells(i, 3).Row
.Cells(Ligne, Colonne + 5) = Me.ComboBox2.Value
.Cells(Ligne, Colonne + 16) ) Me.ComboBox3.value
End if
Next
...
End With
End Sub