souci avec vba

[titooooo]

bonjour

je possédé un classeur avec plusieurs feuille

j'ai déjà activé ce code vba pour pouvoir grouper ou dissocier les colonne sur une feuille protégé

ca marche bien avec la feuille graph mais la je veux aussi avoir le même code sur la page racap

et comment faire si je veut que cette protection se fera sur toutes page

ci dessous le code qui est écris sur la partie vba thisworkbook



Private Sub Workbook_Open()
With Worksheets("Graph")
.EnableAutoFilter = True
.EnableOutlining = True
.Protect Contents:=True, Password:="test", UserInterfaceOnly:=True
End With
End Sub

 

[Pierrot93]

Re : souci avec vba

Bonjour,

essaye ceci :

Option Explicit
Private Sub Workbook_Open()
Dim ws As Worksheet
For Each ws In Worksheets
    With ws
        .EnableAutoFilter = True
        .EnableOutlining = True
        .Protect Contents:=True, Password:="test", UserInterfaceOnly:=True
    End With
Next ws
End Sub

bonne journée
@+