2 soluces (au moins)
Nommer ta plage dynamiquement
Exemple :
Insertion --Nom--Définir-- Nom dans le classeur : 'Liste' -- Fait réf à :
=DECALER(Feuil1!$A$4;;;NBVAL(Feuil1!$A$4:$A$65536))
Ensuite :
Sub zz()
Sheets('Feuil1').ComboBox1.ListFillRange = Liste
End Sub
ou bien :
Sub zz()
With Sheets('Feuil1')
.ComboBox1.Clear
For Each Elt In .Range('A4', .[A65536].End(3))
.ComboBox1.AddItem Elt
Next Elt
End With
End Sub
''...Comme quoi on peut bien lire les posts même sans être ....''
C'est surement la 1° ligne du code (With Sheets('MAJ') )qui a du te mettre sur la voie...