Bonsoir Louvine45
clique une autre fois ou plus sur "F8" l'erreur doit te ramener vers le code et alors mts le code en précisant la ligne en défaut
For i = 1 To 6 ' => pour lister les 4 pays
ComboBox1.AddItem Cells(1, 22 + i) 'Ajoute les valeurs des cellules A1 à A4 avec la boucle
Next
tu as mis en commentaire "lister les 4 pays" mais ces pays ne sont pas dans ton fichier ce qui donne le bug a l'userform sur la combobox avec un objet requis