Bonsoir 'THE' Forum
.............................................
Private Sub UserForm_Initialize()
With Sheets('contacts')
ComboBox3.List = .Range('F15:F' & .Range('F65536').End(xlUp).Row).Value
End With
End Sub
.............................................
Voila comment je rempli ma combobox...
que pourrais je écrire pour qu'elle ne se remplisse que des cellules dont la police est de couleur 3 (par exemple.)
Merci
.............................................
Private Sub UserForm_Initialize()
With Sheets('contacts')
ComboBox3.List = .Range('F15:F' & .Range('F65536').End(xlUp).Row).Value
End With
End Sub
.............................................
Voila comment je rempli ma combobox...
que pourrais je écrire pour qu'elle ne se remplisse que des cellules dont la police est de couleur 3 (par exemple.)
Merci