Sub inicb1()
Dim lg, k As Long
Dim dico, A
Dim c As Range
lg = 0
Application.ScreenUpdating = False
Saisie.ListView1.ListItems.Clear
ListView1
Si problème de 64bits ou d'.OCX, l'UserForm ne s’ouvrirait pas et la ligne en défaut serait "Saisie.Show"
Peut-être un Control ListView renomé ou une bibliothèque oubliée dans "Référence - VBAProject et notamment "MSCOMCTL.OCX".
Dans Saisie j'ai en vain cherché une ListView !!!!
y-a-t-il une procédure WorkBook.Open ?