oups! j'ai parlé un peut trop vite.
ça fonctionne mais la combobox qui se met à jour à chaque changement de multipage 'additionne' les données. (si je dois avoir 5 valeurs dans la combobox, 3 changement de multipage et hop je me retrouve avec 5 valeurs en triple).
une solution ?
merci
voila le code que j'appella à chaque chgt de multipage:
Sub Chargement()
Dim derlgn As Integer, L As Integer
Dim NumFact As Collection
With Worksheets('portefeuille')
derlgn = .Range('A65535').End(xlUp).Row
Tabtemp = .Range(.Cells(2, 1), .Cells(derlgn, 20)).Value
Set NumFact = New Collection
For L = 1 To UBound(Tabtemp, 1)
On Error Resume Next
NumFact.Add Tabtemp(L, 1), CStr(Tabtemp(L, 1))
On Error GoTo 0
Next
For L = 1 To NumFact.Count
UserForm1.ComboBox1.AddItem NumFact(L)
Next
End With
With UserForm1
.ListView1.View = 3
End With
End Sub