XL 2021 mise en forme conditionnelle feuille non protégée

marco22

XLDnaute Occasionnel
Bonjour
J'aimerai mettre en couleur et avec un message une ou plusieurs cellules quand la feuille n'est pas protégée.
Je suppose qu'il faut le faire avec mise en forme conditionnelle, mais je ne sais pas comment faire.
Merci
 

crocrocro

XLDnaute Impliqué
Bonjour Marco,
à ma connaissance, pas possible sans passer par du VBA.
EDIT : J'ai inversé la condition :mad:
je corrige donc
Le code ci-dessous en proposition avec comme règles :
- la mise en évidence concerne les cellules sélectionnées
- si pas de protection, les cellules sont surlignées en vert
- si protection (avec changement de format de cellules autorisé), les cellules sont sans remplissage
- si protection (avec changement de format de cellules non autorisé), juste un message.


VB:
Sub MiseEnEvidenceSiProtection()

Dim MaPlage As Range
    Set MaPlage = Selection
  
    If ActiveSheet.ProtectContents Then
        If ActiveSheet.Protection.AllowFormattingCells Then
           MaPlage.Interior.ColorIndex = xlColorIndexNone
            MsgBox "La feuille est protégée -> Cellules de la Sélection sans couleur de remplissage : " & MaPlage.Address
        Else
            MsgBox "La feuille est protégée (mise en forme des cellules non autorisée) -> Cellules de la Sélection : " & MaPlage.Address
        End If
    Else
        MaPlage.Interior.Color = RGB(0, 255, 0)
        MsgBox "La feuille n'est pas protégée -> Cellules de la Sélection en Vert : " & MaPlage.Address
    End If
  
End Sub
 
Dernière édition:

Phil69970

XLDnaute Barbatruc
Bonjour à tous

@crocrocro
Si c'est possible sans macro et avec une MFC ;)
à ma connaissance, pas possible sans passer par du VBA.

@marco22
Je te propose ce fichier exemple qui le confirme
J'aimerai mettre en couleur et avec un message une ou plusieurs cellules quand la feuille n'est pas protégée.

Par contre pour avoir un message il faut protéger la feuille (sans mot de passe c'est suffisant)

Et bien sur on peut inversé la condition de la MFC pour repérer uniquement les cellules verrouillées

Merci de ton retour
 

Pièces jointes

  • Reperage cellule verrouillée-non verrouiillée par MFC V1.xlsx
    33.5 KB · Affichages: 3

marco22

XLDnaute Occasionnel
Bonjour et merci "crocrocro" et "Phil69970"
Je me suis sans doute mal exprimé dans ma demande
Ce que je voudrai c'est quand la feuille est déverrouillée que soit il a un message pour prévenir que la feuille est déverrouillée ou les cellules K6:L69 sont de couleur rouge pour les feuilles 2ème partie, 3ème partie et, 4ème partie.
j'ai fait une petite macro pour verrouillé et une autre pour déverrouiller
Je pense que simplement colorier les cellules en rouge serai suffisant
J'ai besoin de déverrouiller pour pouvoir modifier des rencontres
je ne sais pas si c'est plus clair pour vous
je joins le fichier

merci
 

Pièces jointes

  • Tournoi de Pétanque-20240803_modifié.xlsm
    374.6 KB · Affichages: 1

Phil69970

XLDnaute Barbatruc
Re

@marco22

Je me suis sans doute mal exprimé dans ma demande
Je confirme ton impression ;)

Perso tu prends le problème à l'envers si tu as peur que quelqu'un déprotège ta feuille je vois sans trop réfléchir 2 solutions.

1ere solution :
Tu mets un MDP sur chaque feuille

2eme solution
Tu verrouilles la feuille chaque fois que tu vas sur une feuille voir fichier
J'ai fait l'exemple sur les 4 feuilles partie N° X
Donc des que tu vas sur une des 4 feuilles partie N° X ta feuille est verrouillé bien sur on peut toujours la déverrouillé mais des que l'utilisateur change de feuille elle se verrouille en activant l'une des 4 feuilles partie N° X
(La protection se fait uniquement sur ces 4 feuilles libre à toi de le faire sur toutes les feuilles )


1722875008771.png


Merci de ton retour
 

Pièces jointes

  • Tournoi de Pétanque-20240803_modifié.xlsm
    411.4 KB · Affichages: 2
Dernière édition:

Discussions similaires

Statistiques des forums

Discussions
315 088
Messages
2 116 089
Membres
112 657
dernier inscrit
jpb3