Hello,

Voilà je fais un logiciel de gestion de compte, j'ai donc un tableau avec 4 colonnes (date,intitulé,débit,crédit) et j'ai créé 2 boutons : 1 pour valider une opération, 1 pour invalider.

1 opération valider voit sa ligne se mettre en vert, j'ai donc créé un userform avec une combobox contenant ttes les lignes non validé du tableau, mais le problème c'est que j'ai fait mon code avec listindex, et que j'ai des problèmes avec les offsets :/

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
16
17
18
19
Private Sub OK_Click()
Dim i As Integer
For i = 0 To 3
    debut_tableau.Offset(List.ListIndex, i).Interior.ColorIndex = 50
Next i
List.RemoveItem (List.ListIndex)
List.ListIndex = 0
End Sub
 
Private Sub UserForm_Activate()
Call init
Dim cellule As Range
List.Clear
    For Each cellule In Range(debut_tableau.Offset(0, 1), debut_tableau.Offset(nb_operation, 1))
        If cellule.Interior.ColorIndex = 15 Then
            List.AddItem (cellule.Offset(0, -1).Value & " " & cellule.Value)
        End If
    Next cellule
End Sub
Ma combobox est nommé : list

Je dois aussi faire un userform avec une combolist contenant ttes les lignes du tableau validé pour les invalidé, mais j'aurais le meme problème.

En gros mon code marche si aucune lignes n'a été validé déja lol.

Je suis un peu perdu