Cellules verouillées

Bonjour à tous,

Je voudrais dans un tableau en un coup d'oeil savoir les cellules qui sont vérouillées ou dévérouillées est-ce possible?

Car j'ai besoins en fonction de mes codes savoir quelles sont les cellules vérouillées.

Si quelqu'un me proposerai de passer par format de cellule ca je sais faire mais ne me donne pas de visu ces cellules.

Je cherche une solution beaucoup plu rapide.

Merci d'avance de votre compréhension.

Amicalement

Noel

Bonjour,

Une solution avec une macro Excel 4 :

se placer en A1 puis :

Insertion - Nom - Définir - Nom : protégée - Fait référence à :

=SI(MAINTENANT()>0;LIRE.CELLULE(14;Feuil1!A1))

Ensuite, sélectionner la zone sur laquelle on veut mettre la MFC destinée à tester si les cellules sont verrouillées ou pas, puis :

Format - Mise en forme conditionnelle - Condition 1 : La formule est :

=protégée

+ choix couleur

Je te laisse essayer

@+

Re,

Bonjour Thibo

Je te remercie pour ta réponse aussi rapide.

Je vais essayé le code.

Je te tiendrai au courant.

Amicalement

Noel

-- Jeu Aoû 19, 2010 9:21 am --

Re,

Mon cher Thibo,

Peux-tu éclairer ma lanterne? quand tu me demandes de sélectionner A1 Insertion - Nom - Définir - Nom : protégée - Fait référence à : =SI(MAINTENANT()>0;LIRE.CELLULE(14;Feuil1!A1)) ce code est-il valable que pour A1 ou pour la feuille entière? le "14" représente exactement quoi dans ce code?.

J'essaye de comprendre.

Si par exemple mon tableau va de A1:w44 faut-ilo que je remplace A1 par A1:w44?

J'ai essayé des 2 façons ça me donne aucun résultat en utilsant le MFC

A te relire

@+

Amicalement

Noel

Bonjour Noel, thibo, forum,

Tu peux aussi avec ce code,

(la 1ère ligne pour supprimer la couleur)

si la plage est discontinue, vaut mieux la nommer.

Sub CelVerrou()
Dim Cel As Range
    Range("a2:b100").Interior.ColorIndex = xlNone

    For Each Cel In Range("a2:b100") 'plage à régler ou nommer
        If Cel.Locked = True Then Cel.Interior.ColorIndex = 6
    Next Cel
End Sub

Bonne journée

Claude

re,

Ci-joint fichier avec la mise en forme conditionnelle telle que proposée tout à l'heure.

Les cellules vertes sont celles qui sont verrouillées sur lesquelles la MFC s'applique.

Sur les cellules déverrouillées, la MFC ne s'applique plus.

@+

Re,

Re Thibo

Bonjour Claude,

Je te remercie pour ton code.

Je pense avoir trouvé la solution, tu me diras ce que tu penses.

Comme dans mes code utilisés j'ai nommé des cellules qui recevront des information, j'ai voulu tout simplement que les autres qui possèdent des formules ne soient pas touchées, je me suis pris de cette façon :

Je clique sur le bouton concerné bien entendu ça BUG parce que la feuille est protégée. A ce moment sans quitter le bug j'enlève la protection de la feuille il sélectionne automatiquement les cellules qui sont verouillées alors qu'elles ne devraient pas l'être. Et là je fais FORMAT/CELLULE/DEVEROUILLER et ça rentre dans l'ordre.

Ets-ce une bonne solution?

Merci de tes conseils.

Amicalement

Noel

re,

en règle générale dans une feuille protégée,

toutes les cellules sont verrouillées à l'exception de celles que tu as choisi de déverrouiller.

Claude

Re,

Cette information je connais.

Mais quand réalise ton code tu l'écris sans tenir compte. Ca fonctionne tant que tu ne verrouille pas la page.

Au moment ou tu verrouilles les cellules nommées ne peuvent recevoir les données et là ca BUG.

J'ai contourné ce PB à la façon citée dans mon dernier mesage.

Merci

Amicalement

Noel

re,

Mon code ne verrouille rien, il teste simplement si la cellule est verrouillée

Claude

Re,

Merci à vous pour m'avoir aidé à résoudre mon Pb

@+

Amicalement

Noel