Comment protéger toutes les feuilles excel

Emmalice -  
eriiic Messages postés 24581 Date d'inscription   Statut Contributeur Dernière intervention   -
Bonjour,

Est ce qu'il y aurait un moyen de protéger toutes les feuilles d'un classeur excel (500 feuilles) toutes modif impossible sauf sur le première feuilles sans pour autant protéger feuille par feuille ??

Merci pour vos réponses

1 réponse

  1.
    eriiic Messages postés 24581 Date d'inscription   Statut Contributeur Dernière intervention   7 281
     
    Bonjour, 

    Sub ProtégerFeuilles()
    Dim sh As Worksheet
    For Each sh In Worksheets
        If sh.Name <> "Feuil1" Then
            sh.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True
        End If
    Next sh
End Sub


    eric
    0

Discussions similaires

Excel : afficher toutes les lignes et colonnes masquées
livlarsen -
Mehdiiii -

27 réponses
remettre toutes les colonnes et les lignes masquées
mousaillon -
oumnas -

4 réponses