Erreur '40036' Excel 2003

Question

Bonjour mon but est de créer un code qui récupère la valeur d'un combobox mais j'ai la même erreur à ce niveau la :

Dim i As Integer, L As Integer

'Dernière ligne remplie de la feuille Rubriques

With Sheets("Donnees")

L = .Range("A1000").End(xlUp).Row

'Attribution des rubriques au contrôle CBxTitreCharge

For i = 3 To L

If .Cells(i, 1) Mod (100) = 0 Then

UserForm1.ComboBox1.AddItem .Cells(i, 1)

End If

Next i

End With

' Position des focus

UserForm1.ComboBox1.SetFocus

LIGNE EN CAUSE : L = .Range("A1000").End(xlUp).Row

Erreur : Erreur d'exécution '40036' Erreur définie par l'application ou par l'objet

Merci de votre aide

Raja · Answer

Le code semble correcte. Vérifie toujours le nom de la feuille si cela correspond exactement identique que dans la macro...