tüm sayfalardan bilinen şifre ile sayfa korumayı kaldıran modül?

[DEUMEHMET]

arkadaşlar tüm sayfalara modül ile şifre koymayı-korumayı öğrendim.

http://www.excel.web.tr/f14/excel-de-caly-ma-sayfasyny-koruma-t73770.html

ancak bunun tam tersini tüm sayfalardan modül ve bilinen şifre ile nasıl yapıcam?

bu aradan bende sayfa isimleri biraz farklı I.C.1 gibi başlıyor hepsi.
BUrada nasıl bir yol izlemeliyim?

Şimdiden çok teşkkürler. saygılarımla.

 

[DEUMEHMET]

Sub SayfaKoru()
For Each Worksheet In ActiveWorkbook.Worksheets
Worksheet.Unprotect Password:="123"
Next
End Sub


yaptım