Ouverture formulaire : Permission refusée

Bonjour à tous,

Je m'arrache les cheveux depuis ce matin.

J'ai repris un code issu d'une proposition sur le forum qui me conviendrait bien. Sur le fichier transmis, tout fonctionne et c'est parfait !

Mais quand je le copie, cela me génère systématiquement une erreur sur le module "Afficher formulaire", J'ai repris mot pour mot le code sur un fichier vierge (en enlevant seulement un combo car je n'en ai besoin que de 3 et il y en a 4 à l'origine). Je n'y comprends rien

Est ce que quelqu'un peut éclairer ma lanterne ?

Merci à vous

J'ai trouvé ! : je n'avais pas vidé les "Sources Row" des combobox.

Je n'ai plus de message d'erreur, mes les combobox ne se chargent pas.... j'y retourne !

Bonjour,

A voir votre feuille BD, j'aurais plutôt fait un seul tableau structuré et pas 4
Après pour charger la combobox1, j'aurais fait ceci

Private Sub UserForm_Initialize()
Dim c As Range
Dim tablo As Collection
Dim item

On Error Resume Next
Set tablo = New Collection

For Each c In Sheets("BD").ListObjects("T_logo").DataBodyRange
    tablo.Add c.Value, CStr(c.Value)
Next c

On Error GoTo 0
For Each item In tablo
    Me.ComboBox1.AddItem item
Next item
End Sub

Pour continuer, faire un seul tableau BD serait mieux

Crdlt

Bonjour Dan,

Merci pour ton retour.

J'ai trouvé mon erreur : je n'avais pas mis la macro au bon endroit Tout fonctionne maintenant.

Et oui, effectivement j'ai tout regroupé sur un même tableau.

Merci encore