C
Creepy
Guest
Sur les bons conseils du très fort @+Thierry j'ai fait ca !!
Private Sub Workbook_Open()
Dim DerCell As String
DerCell = Range("BdeD!A2").End(xlDown).Address
Clientbox.ListFillRange = "BdeD!a2:" & DerCell
End Sub
Mais quand je l'execute, j'ai un beau message d'erreur : Erreur d'execution 424 : Objet Requis. J'ai l'impression qu'il trouve pas ma Combobox !! ?? !!
C'est ca ??? C koa la Solution ???
Ce qui est bizarre c'est dans un autre essai avec exactement la même chose ca marche !! ?? !!
Merci d'avance
Creepy
Private Sub Workbook_Open()
Dim DerCell As String
DerCell = Range("BdeD!A2").End(xlDown).Address
Clientbox.ListFillRange = "BdeD!a2:" & DerCell
End Sub
Mais quand je l'execute, j'ai un beau message d'erreur : Erreur d'execution 424 : Objet Requis. J'ai l'impression qu'il trouve pas ma Combobox !! ?? !!
C'est ca ??? C koa la Solution ???
Ce qui est bizarre c'est dans un autre essai avec exactement la même chose ca marche !! ?? !!
Merci d'avance
Creepy