Bonjour à tous,

J'ai trouvé ce code qui devrait me permettre d'alimenter des Label en fonction d'un choix fait dans une ComboBox, sauf que je ne comprends pas tout le code.

Pourriez-vous m'apporter votre lumière s'il vous plait ?
Je vous en remercie par avance

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
 
Private Sub ComboBox1_Change()
Dim C As Range, i As Byte
Set C = ActiveSheet.Cells.Find(What:=ComboBox1) 'Là je ne comprends pas 
If Not C Is Nothing Then
    For i = 4 To 6 'Là non plus
        Me.Controls("Label" & i).Caption = C.Offset(0, i - 3).Value 'Là non plus
    Next i
End If
End Sub