Bonjour,
Je souhaite protéger une feuille automatiquement, mais je me retrouve "coincé" car je souhaiterais laisser aux utilisateurs la possibilité :
- d'insérer des lignes
- faire des tris
- utiliser le filtre automatique
Voici mon code actuel, comment puis-je insérer les options ci-dessus ?
---------------
Sub Protéger_feuilles()
'
' Protéger_feuilles Macro
'
Sheets("Feuil1"").Select
Range("A1").Select
ActiveSheet.Protect ("toto")
Sheets("Feuil1").Select
Range("A1").Select
End Sub
--------------
Merci d'avance,
rom3210
Je souhaite protéger une feuille automatiquement, mais je me retrouve "coincé" car je souhaiterais laisser aux utilisateurs la possibilité :
- d'insérer des lignes
- faire des tris
- utiliser le filtre automatique
Voici mon code actuel, comment puis-je insérer les options ci-dessus ?
---------------
Sub Protéger_feuilles()
'
' Protéger_feuilles Macro
'
Sheets("Feuil1"").Select
Range("A1").Select
ActiveSheet.Protect ("toto")
Sheets("Feuil1").Select
Range("A1").Select
End Sub
--------------
Merci d'avance,
rom3210