Bonjour,
Je souhaiterais connaitre les codes vba pour activer ou desactiver les choix qui me sont proposés dans le sous menu de protection.Pour pouvoir completer ce bout de prog.
Sub ProtectionFeuilles()
Dim i As Integer
For i = 1 To Sheets.Count
Sheets(i).Protect DrawingObjects:=False, Contents:=True, Scenarios:= _
True
Next i
End Sub
Je souhaiterais connaitre les codes vba pour activer ou desactiver les choix qui me sont proposés dans le sous menu de protection.Pour pouvoir completer ce bout de prog.
Sub ProtectionFeuilles()
Dim i As Integer
For i = 1 To Sheets.Count
Sheets(i).Protect DrawingObjects:=False, Contents:=True, Scenarios:= _
True
Next i
End Sub