Autoriser une Macro sur une feuille protegee

Bonjour a tous,

Je suis nouveau sur ce forum ( et quel excellent site !)

Pour une quelquonque raison, la macro ne fonctionne plus lorsque je protege mon onglet.

Savez vous d'ou provient le probleme?

Exemple en piece jointe : mot de passe : 2019

Merci d'avance pour votre precieuse aide

GT

Bonjour goldentables et

Ta cellule est bien déverouillée, mais :

Dans la cellule K3, ta donnée de validation est

=INDIRECT(AE3)

et tu veux inscrire dans K2

=listing

Tu n'as aucune plage nommée "listing", je pense que le problème vient de là

A+

Bonjour BrunoM45,

Merci beaucoup pour ton retour mais je ne trouve toujours pas la solution. La plage "listing" est en colonne AL

Cdtl,

GT

Re,

Dans le fichier joint, tu n'as aucune plage nommée "listing"

Nomme la et tu n'auras plus de soucis

Hello,

Si tu regarde dans le gestionnaire de nom, j'ai bien une selection nomee Listing.

Aurais tu une autre piste ?

Merci d'avance

Manil

Re,

Désolé, effectivement

Alors dans ce cas, il faut supprimer la protection et la remettre

  With ThisWorkbook.Sheets("Database")
    .Unprotect Password:="2019"
    With .Range("K2").Validation
      .Delete
      .Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:=xlBetween, Formula1:="=Listing"
      .IgnoreBlank = True
      .InCellDropdown = True
      .InputTitle = ""
      .ErrorTitle = ""
      .InputMessage = ""
      .ErrorMessage = ""
      .ShowInput = True
      .ShowError = True
    End With
    .Protect Password:="2019"
  End With

A+

Re,

Malheureusement, toujours pas de succes avec la macro ci dessus.

Je te joins mon fichier pour voir si il y a quelque chose que j'ai pu oublier.

Cdtl,

Hello,

Quelqu'un d'autre aurait une solution ?

Merci d'avance

Re,

Que fais-tu exactement avec ton fichier !?

Chez moi la macro fonctionne, mais il faut la lancer, nous sommes bien d'accord

Cela fonctionne bien maintenant, Merci BrunoM45!