Bonjour le forum,
Premiére chose j'ai un Userform avec Multipage1.Page1.Page2.Page3
Dans mes pages, j'ai une litbox par page et des combobox

Je vais prendre un exemple juste pour une page :
sur ma page1 j'ai une ListBox1 que j'ai configurer en 7 colonnes
Et des combobox il y en à 7 comme le nombre de colonnes de ma listbox.

Voici les codes pour ma ListBox
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
Private Sub ListBox1_Click()
    With UserForm1.MultiPage1.Page1
        For x = 1 To 8: Controls("Textbox" & x) = ListBox1.List(ListBox.ListIndex, x - 1): Next x
    End With
End Sub
Pour useform
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
Private Sub UserForm_initialize()
x = Sheets("nondelafeuil").Range("a2:i" & Range("a65536").End(xlUp).Row): ListBox1.List = x
End Sub
Puis j'ai un code pour modifier le cotenu,
exemple dés que j'appuie les données dans ma listbox ceci se mettent automatiquement dans les combobox puis je modifie un truc et j'appuie sur mon bouton modifier et voici le code
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
Private Sub CommandButton1_Click()
If TextBox1.Value = "" Then Exit Sub
Cells(ListBox2.ListIndex + 2, 1).Select: z = ActiveCell.Row
For x = 1 To 8: Cells(z, x) = Me.Controls("Textbox" & x).Value: Next x: Beep
End Sub
Maintenant la question, c'est que ma listbox s'actualise pas ou se rafraichi pas
En je voudrais que dés que j'appuie sur mon bouton modifier qu'il m'actualise ma listbox.

Ci quelqu'un à une réponse ce serais très gentil merci d'avance
A +++