XL 2019 probleme dans une macro

[tomy87]

bonjours ,j'ai un probleme et ne trouve pas comment y remédié. j'ai une erreur lors du lancement d'une macro . l'erreur se surligne en jaune de"
.Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
xlBetween, Formula1:="=liste_ingrédients"



Range("A7:A22").Select
With Selection.Validation
.Delete
.Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
xlBetween, Formula1:="=liste_ingrédients"
.IgnoreBlank = True
.InCellDropdown = True
.InputTitle = ""
.ErrorTitle = ""
.InputMessage = ""
.ErrorMessage = ""
.ShowInput = True
.ShowError = False
End With
Calculate
Range("A7").Select
End Sub

 

[mapomme]

Bonjour @tomy87,

Êtes-vous certain que le nom liste_ingrédients existe et désigne bien la plage des éléments devant figurer dans la liste de validation ?

Votre code fonctionne, voir fichier joint.

 

[tomy87]

moi aussi elle fonctionne sur une page mais lorsque je clique sur ma macro qui créait une nouvelle feuill etc la elle bug

 

[mapomme]

Re,

Voir le fichier. La macro fonctionne sur toutes les feuilles même nouvellement créée. La macro a été légèrement modifiée et surtout supprimée du module de Feuil1 pour être placée dans un module à part. la macro fonctionne pour la feuille active.