Me.TextBox1 = Me.ListBox1.List(ListIndex, 0) ' Ref
Me.TextBox2 = Me.ListBox1.List(ListIndex, 1) ' Nom
Me.TextBox3 = CDate(Me.ListBox1.List(ListIndex, 2)) ' Date
Me.TextBox4 = Me.ListBox1.List(ListIndex, 3) ' N° Facture
Me.TextBox5 = Me.ListBox1.List(ListIndex, 4) ' Adresse
Me.TextBox6 = Me.ListBox1.List(ListIndex, 5) ' CP
Me.TextBox7 = Me.ListBox1.List(ListIndex, 6) ' Ville