Insérer un seul code vba dans plusieurs classeurs férmés

Bonjour
je voudrais appliquer un seul code vba sur plusieurs classeurs férmés contenus dans un dossier
j'ai le code ci-dessous

Code:

---

1 2 3 4 5 6 7 8

Protect_Example1()   For i = 1 To Sheets.Count Sheets(i).Protect Next i     End Sub

---

pour vous précisez , mon objectif est d’insérer ce code dans plusieurs classeurs férmés
Merci pour votre coopération habituelle
remerciement