franck,
fais une boucle sur la collection de feuille du classeur:
Sub DeprotegeFeuilles()
Dim MaFeuille As Worksheet
For Each MaFeuille In Worksheets
ActiveSheet.Unprotect
Next MaFeuille
End Sub
A+
trop vite ! posté trop vite gourré! la macro corrigée
Sub DeprotegeFeuilles()
Dim MaFeuille As Worksheet
For Each MaFeuille In Worksheets
MaFeuille.Unprotect
Next MaFeuille
End Sub
Message édité par: luki, à: 24/03/2005 17:31