XL 2019 Protection dans une feuille.

[Paulle]

Bonjour,
Sur la feuille 11, si je rentre une date en cellule B28, la cellule A28 se met à jour.

Sur la feuille 22, j’ai protégé les cellules de A2 à A27. Et là, la cellule A28 ne se met pas à jour. Et le tableau se transforme en plage de donnée.

Est-il possible en plus, que si l’on clique par exemple sur la cellule A28 qui est dans la colonne protégée d’aller directement sur la cellule B28 ?

Merci.

 

[sylvanu]

Bonsoir Paulle,
Un essai en PJ avec ce que j'ai compris. Le tableau est déprotégé uniquement si on clique sur la première cellule vide colonne B après le tableau. Sinon adaptez.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Intersect(Target, [B:B]) Is Nothing Then
    L = Target.Row  ' Extraction N° de ligne
    ' Si la cellule cliquée est la première ligne vide après le tableau on déprotège, sinon on protège
    If Cells(L - 1, "B") <> "" And Cells(L + 1, "B") = "" Then ActiveSheet.Unprotect Else ActiveSheet.Protect
ElseIf Not Intersect(Target, [A:A]) Is Nothing Then
    ' Si clic en A on va sur même ligne en colonne B
    Cells(Target.Row, "B").Select
End If
End Sub

 

[Paulle]

Bonjour sylvanu et merci.
Le fonctionnement est parfait.
Mais, j'ai voulu simplifier le tableau pour le forum et en fait il y a deux colonnes de plus comme sur la feuille 33 et la cela ne fonctionne plus correctement.

 

[sylvanu]

Bonsoir,
1- Il n'y a pas de feuille 33 dans votre fichier.
2- La macro doit être dupliquée sur chaque feuille.

 

[Paulle]

Voilà le fichier, je les avais mélangé.

 

[Paulle]

J'ai copié le code vb dans ma feuille 33 et cela fonctionne.
Merci.

 

[sylvanu]

Bonsoir,
Le post mis en vert remontera juste après votre demande pour guider le futur lecteur vers la solution.
Donc mettre un post "ça marche" n'aiguillera pas le futur lecteur, autant ne pas en mettre pour éviter de le perturber.

 

[Paulle]

Bonsoir,
Le post mis en vert remontera juste après votre demande pour guider le futur lecteur vers la solution.
Donc mettre un post "ça marche" n'aiguillera pas le futur lecteur, autant ne pas en mettre pour éviter de le perturber.

 

[Paulle]

post "ça marche" c'est cocher "Marquer comme solution"?

 

[sylvanu]

Oui. Le post #6 l'était, mais il ne l'est plus.
Il semblerait que vous l'ayez décoché. C'est mieux pour la logique de lecture.

 

[Paulle]

Bonjour,

Je me suis rendu compte à l’usage que quand je clique en colonne A, c’est bien une cellule en B qui est sélectionnée. Ça fonctionne correctement.

Par contre, le tableau est verrouillé je ne peux pas y modifier ou entrer une valeur.

Si j’ajoute une date au bas du tableau, il est impossible de faire un tri sur les dates, il y a « Erreur d’execution ‘1004’ ».

Les modifications sont-elles possibles ?

 

[sylvanu]

Par contre, le tableau est verrouillé je ne peux pas y modifier ou entrer une valeur.

Est-il possible en plus, que si l’on clique par exemple sur la cellule A28 qui est dans la colonne protégée d’aller directement sur la cellule B28 ?

Ben oui puisque c'est la demande, la feuille est protégée dès lors où on écrit en fin de tableau.
C'est d'ailleurs le titre de votre fil : Protection dans une feuille.

Comme il n'y a pas de mot de passe, il vous suffit de faire clic droit sur l'onglet et Ôter la protecton.

 

[Paulle]

Oui, je me suis mal expliqué.
Je voulais uniquement que quand je clique sur une cellule en colonne A se soit la cellule même ligne de la colonne B qui soit sélectionnée.

 

[Paulle]

Si j’ôte la protection de la feuille, et si je fais un tri sur les "Dates" il y a une erreur qui stop le code.

 

[sylvanu]

C'est la sélection multiple qui posait problème. Essayez cette PJ.