Je veux bien copier/coller la totalité mais c'est super long, c'est toi qui voit.
Voici un extrait ou je pense il faut rajouter les ligne pour lié ou plutôt ouvrir et dire dans quelle doc chercher:
Private Sub UserForm_Initialize()
Me.StartUpPosition = 0
Me.Top = 255
Me.Left = 250
For b = 1 To 35: Set Txt(b).GrSaisie = Me("textbox" & b): Next b
B_tout_Click
NbCol = [Tableau1].Columns.Count
'---- A adapter si évolution
TabBD = [Tableau1].Resize(, NbCol + 1).Value ' On utilise des Array car c'est plus rapide
For i = 1 To UBound(TabBD): TabBD(i, NbCol + 1) = i: Next i
ColCombo = Array(1, 2, 3, 4, 5, 6) ' A adapter (1 à 6 colonnes max pour le moment)
colVisu = Array(1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28) ' Colonnnes ListBox (à adapter)
'----
Je pense qu'à chaque fois que j'appel le tableau 1, il faut rajouter une ligne avant expriment dans quelle classeur se rendre, des idées?