Cellule verouillees en couleur

bonjour

Comment puis je faire apparaitre les cellules verouillées en couleurs?

Merci

allez soyez chic...

Ne soit pas impatient comme ça !

Code de PascalXLD

Sub Test()
For Each ws In Worksheets
For Each o In ws.UsedRange
If ws.o.Locked = True Then
If ws.o.Interior.ColorIndex = xlNone Then ws.o.Interior.ColorIndex = 3 Else ws.o.Interior.ColorIndex = xlNone
End If
Next
Next
End Sub 

Amicalement

Nad

Bonjour,

Bonjour, NAD

une autre possibilité, sans Macro, mais avec une mise en forme conditionnelle

Tu sélectionnes ta zone, exemple de A1 à C10

tu fais format/Mise en forme conditionnelle

Tu sélectionnes : la formule est :

et à droite, tu entres ceci :

=CELLULE("protege";A1)

Tu choisis la couleur, si la valeur est Vraie

Attention, si tu choisis de F8 à G45, par exemple, remplace A1 par F8

Ca marche po,

La premiere solution est un macro apparemment, j'ai essayé mais je n'en ai jamais fait...

La seconde solution ne fonctionne pas...

je reformule ma question au cas ou il y aurait mal entendu :

Je voudrais que les cellule que je ne peux pas midifier car verouillé et protégé apparaissent en couleur (de mon choix si possible) afin de pouvoir les reperer facilement

MERci a vous tous

PS i m a girl

personne ne peut m'aider...

Quand je copie colle la formule de macro ca affiche un message d'erreur...

MERKI

Bonjour,

J'ai adapté le code macro donné par Nad comme suit :

Sub colorie()
Dim o
With ActiveSheet
For Each o In .UsedRange
If o.Locked = True Then
    .Unprotect
If o.Interior.ColorIndex = xlNone Then o.Interior.ColorIndex = 3
    .Protect
End If
Next
End With
End Sub

Vois le fichier joint et dis nous s'il c'est cela que tu souhaites. Clique sur le bouton sur la feuille 1 pour visualiser les couleurs sur cellules protégées (ici B3 et D5)

Fichier --> https://www.excel-pratique.com/~files/doc/Mk4JQClasseur1.xls

Amicalement

DAN

Edit Dan : A noter que la proposition de Felix fonctionne très bien. Suis bien pas à pas ses explications.

hello

chez moi, la fonction CELLULE(... ; ...) ne fonctionne pas pour toutes les possibilités qui sont décrites dans l'aide

ex :

col ou adresse fonctionnent

protection ou préfixe ne fonctionnent pas !

des idées ? (Vista+Excel2003)

merci

Bonjour

minalechat, regarde le fichier joint

les cellules non protégées sont sans couleur de fond

https://www.excel-pratique.com/~files/doc/cellules_protegees.xls

jmd,

pour col, tu mets colonne

pour préfixe, tu mets prefixe

pour protection, tu mets protege

par contre, adresse fonctionne (XP, 2003 et 2007)