Bonjour,

J'ai un petit souci sur un ComboBox, voici mon code que j'ai recuperé sur le tutoriel du site:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
Dim j As Integer
 
'Récupère les données de la colonne A...
For j = 3 To Sheets("TAMPON").Range("AX65536").End(xlUp).Row
    SUP_BOUCLE.ComboBox1 = Sheets("TAMPON").Range("AX" & j)
    '...et filtre les doublons
    If SUP_BOUCLE.ComboBox1.ListIndex = -1 Then SUP_BOUCLE.ComboBox1.AddItem Sheets("TAMPON").Range("A" & j)
 
Next j
Mon soucis est que lors de l'execution du code j'ai une erreur 70 "Accés refusé"