Menu

Macro dans une feuille protégée

- - Dernière réponse :  fanny - 14 mai 2019 à 20:47
Bonjour,

Je souhaiterais savoir si il y a une macro qui permet d'autoriser la suppression de ligne malgré la protection de la Feuille
Je m'explique: j'ai une feuille de saisie (un tableau) ou certaines colonnes sont protégées (celles ou il y a des formules). je souhaiterais néanmoins autoriser la suppression de ligne si nécessaire.

je veux que ma feuille se dévérouile seulement quand une ligne entière est selectionner. Autrement je veux qu'elle reste verrouiller et je souhaiterais que pouvoir activer cette macro seulement dans le cas ou la ligne entière est selectionné, dans la plage donnée

Merci
Afficher la suite 

Votre réponse

6 réponses

Messages postés
498
Date d'inscription
mardi 5 juin 2018
Statut
Membre
Dernière intervention
23 mai 2019
36
0
Merci
Bonjour,

Essaie :

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
  If Target.Count = Columns.Count And Target.Rows.Count = 1 Then
    ActiveSheet.Unprotect
  End If
End Sub


Cordialement.

Daniel
Commenter la réponse de danielc0
0
Merci
Bonjour Daniel,

Ca ne fonctionne pas, lorsque je sélectionne la ligne à supprimer j'ai un message me demandant d'ôter la protection de la feuille alors que je veux que celle-ci reste protégée

Cordialement
danielc0
Messages postés
498
Date d'inscription
mardi 5 juin 2018
Statut
Membre
Dernière intervention
23 mai 2019
36 -
Tu dois mettre le code dans le module de la feuille en question. Fais un clic droit sur l'onglet et clique sur "Visualiser le code". Colle alors celui-ci.

Daniel
Commenter la réponse de fanny
Messages postés
648
Date d'inscription
lundi 2 juillet 2018
Statut
Membre
Dernière intervention
26 mai 2019
63
0
Merci
Bonjour fanny

Ta feuille est protégée avec un mot de passe?
Cordialement
Bonjour JCB40,

Actuellement non mais en fonction de ce qui est possible comme solution pourquoi pas

Cordialement
Commenter la réponse de JCB40
0
Merci
Ca fonctionne néamoins une fois la suppression de la ligne sélectionnée faite l"ensemble des cellules restent dévérouillées et la feuille n'est plus protégée alors que je voudrais que la feuille entière reste protégée

Cordialement
Commenter la réponse de fanny
Messages postés
22735
Date d'inscription
mardi 11 septembre 2007
Statut
Contributeur
Dernière intervention
25 mai 2019
5477
0
Merci
Bonjour à tous,

il suffit de compléter le code :
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Target.Count = Columns.Count And Target.Rows.Count = 1 Then
        If MsgBox("Supprimer la ligne ?", vbYesNo + vbQuestion) = vbYes Then
            ActiveSheet.Unprotect Password:="123"
            Target.EntireRow.Delete
            ActiveSheet.Protect Password:="123"
        End If
    End If
End Sub

J'ai ajouté également une demande de confirmation.
Si tu veux sans mot de passe supprimer Password:="123"
eric


En essayant continuellement, on finit par réussir. 
Donc plus ça rate, plus on a de chances que ça marche.(les Shadoks)
En plus du merci (si si, ça se fait !!!), penser à mettre en résolu. Merci
Bonjour Eric,

Dans le prolongement de ma question je souhaiterai également qu'en plus de supprimer et d'insérer une ligne, la macro puisse aussi me proposer de couper, copier et coller

Comment faire ?

Merci de votre aide

Cordialement
eriiic
Messages postés
22735
Date d'inscription
mardi 11 septembre 2007
Statut
Contributeur
Dernière intervention
25 mai 2019
5477 -
Dis plutôt ce que tu souhaites protéger, ça sera peut-être plus simple (?)
En faite je souhaite que la feuille reste protégée car il y a plusieurs utilisateurs différents et qui ne sont pas tous autorisés à agir sur certaines cellules.
Donc je souhaite que la ligne une fois sélectionnée proposer d'insérer une ligne de couper, copier, coller ou supprimer la ligne et que la feuille ne soit déprotégée qu'une fois la ligne sélectionnée et que si la ligne n'est pas sélectionnée la feuille reste protégée
Je ne sais si je suis claire dans mes explications ?
eriiic
Messages postés
22735
Date d'inscription
mardi 11 septembre 2007
Statut
Contributeur
Dernière intervention
25 mai 2019
5477 -
C'est à dire que là ça va devenir une usine à gaz...
Je ne vois pas comment l'aborder simplement.
eric
Existe t'il dans ce cas une macro qui permette de déverrouiller la feuille quand une ligne est sélectionnée en donnant l'accès en faisant un clic droit aux options couper, copier coller et supprimer et que la feuille reste protégée si la ligne n'est pas sélectionnée ?
Commenter la réponse de eriiic
0
Merci
Je vous remercie tous pour l'aide apporter

Bonne soirée
Commenter la réponse de fanny