Protection et combo box

bonjour,

Je protège une feuille par le code suivant:

ActiveSheet.EnableOutlining = True
ActiveSheet.Protect Password:="dima", Contents:=True, userInterfaceOnly:=True, DrawingObjects:=True
ActiveSheet.EnableAutoFilter = True

Sur cette feuille j'ai une combobox (menu déroulant) et la protection fait que lorsque je veux la faire dérouler le msg box de protection s'affiche "Cette feuille est protégée avec la commande Protection du menu outil".

Comment faire pour éviter cela ?

Je vous remercie,
Mat