XL 2019 Erreur Impossible de définir la propriété list. Le type ne correspond pas

 .List(memoire, 0) = Me.ListBox1

Private Sub CommandButton1_Click()
If Me.Txt_nombre <> "" And Me.cbx_type.ListIndex >= 0 Then

    With Me.List_order
     .AddItem
         .List(memoire, 1) = Me.Cbx_article1
         '.List(memoire, 2) = Me.Txt_nombre
         '.List(memoire, 0) = Me.Cbx_test
         .List(memoire, 0) = Me.ListBox1
         .List(memoire, 2) = Me.ListBox2
 
 
  End With
 
 memoire = memoire + 1
 Me.Cbx_article1 = ""
  Me.Cbx_test = ""
  Me.Txt_nombre = ""
  Me.ListBox1 = ""
  Me.ListBox2 = ""

End If
End Sub