XL 2016 Macro avec mot de passe

jymathieu à dit:

Bonjour,
Je voudrais que ma macro suivante protège certaines cellules mais comprenne également le mot de passe, comment faire
ActiveSheet.Protect DrawingObjects:=True,Contents:=True, Scenarios:=True _
, AllowFormattingCells:=True, AllowFormattingColumns:=True, _
AllowFormattingRows:=True, AllowInsertingRows:=True, AllowDeletingRows:= _
True, AllowSorting:=True, AllowFiltering:=True,

Où dois-je mettre la formule ActiveSheet.Protect ("12345")?

Merci d'avance

Cliquez pour agrandir...