Discussion :

[tony847]

Bonsoir

j’ai un classeur qui est composé de 2 feuilles :
Feuil1 Commandebouton, feuil2 Base de donnée.
Je voudrai qu’en cliquant sur le bouton cela m’ouvre la boite de dialogue.
Je voudrai qu’en faisant défilé celle-ci cela me fait apparaître les données de chaque colonne dans les différents Combox

fichier essai

Merci pour votre aide

[fring]

Re Toby,

Si je comprend bien ta question, tu souhaites charger tes Combo avec les données de ta feuille "Base de donnée".

Si c'est ça, essaye ceci :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
Private Sub UserForm_Initialize()
Dim i As Byte, j As Integer, DerL As Integer
 
With Sheets(2)
DerL = .Cells(65535, 5).End(xlUp).Row
    For i = 1 To 5
        For j = 5 To DerL
            If .Cells(j, i) <> "" Then
                Me.Controls("ComboBox" & i).AddItem .Cells(j, i)
            End If
        Next
    Next
End With
End Sub

Si c'est pas ça...ne l'essaye pas

Edit : inverse les noms de tes ComboBox4 et ComboBox5 pour obtenir sur ton Userform
Combo1 / Combo2 / 3 / 4 / 5