Bonjour,

J'ai une base qui va de A1 à AI4670.
Les entetes de colonnes sont bien sur sur la ligne 1.

Voila le debut du code de mon userform:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
Private Sub UserForm_Initialize()
   Set f = Sheets("bd") 
   der_ligne = f.Range("A1").End(xlDown).Row
   Set Rng = f.Range("A2:AI" & der_ligne)
   NomTableau = "Tableau1"
   ActiveWorkbook.Names.Add Name:=NomTableau, RefersTo:=Rng
    '----
    Me.ListBox1.RowSource = Rng.adress
Et là j'ai le message:

Erreur d'exécution '438':
Propriété ou méthode non gérée par cet objet
J'ai cherché sur plusieurs autres forums, sans trouver de solution qui fonctionne.
La propriété Columnheads est bien à True sur mon userform.
Merci de me dire ou je fais l'erreur .