OVH Cloud OVH Cloud

boucle simple pour vérif

3 réponses
Avatar
mik
Bonjour,

j'aimerais connaitre le p'ti bout de code capable de boucler pour toutes les
cellules d'une feuille afin de différencier celles qui sont vérouillées des
autres en les mettant en fond noir par exemple. Ceci afin d'éviter de
distribuer un tableau avec des cellules protégées qui ne devraient pas l'etre.

Merci d'avance
mik

3 réponses

Avatar
JB
On 3 fév, 21:45, mik wrote:
Bonjour,

j'aimerais connaitre le p'ti bout de code capable de boucler pour toutes les
cellules d'une feuille afin de différencier celles qui sont vérouill ées des
autres en les mettant en fond noir par exemple. Ceci afin d'éviter de
distribuer un tableau avec des cellules protégées qui ne devraient pa s l'etre.

Merci d'avance
mik


Bonsoir,

Avec MFC

-Sélectionner les cellules (A1:G100 par ex)
-Format/Mise en forme conditionnelle/La formule est
=NON(CELLULE("protege";A1))

Les cellules déverrouillées apparaissent dan sla couleur choixie.

Cordialement JB

Avatar
Garette
Bonsoir,

Sub Macro1()
For Each X In Range(Range("A1"), ActiveCell.SpecialCells(xlLastCell))
If X.Locked = True Then X.Interior.ColorIndex = 6
Next
End Sub

Ca les mets en Jaune, sinon on ne voit plus ce qu'il y a dans la cellule.
Pour mettre en noir : ColorIndex = 1
Avatar
mik
La solution sans VBA est très simple et me suffit pour me contrôler.
Je vous remercie bcp tous les 2.

bon dimanche,
mik

"mik" wrote:

Bonjour,

j'aimerais connaitre le p'ti bout de code capable de boucler pour toutes les
cellules d'une feuille afin de différencier celles qui sont vérouillées des
autres en les mettant en fond noir par exemple. Ceci afin d'éviter de
distribuer un tableau avec des cellules protégées qui ne devraient pas l'etre.

Merci d'avance
mik