XL 2016 VBA - Une manière rapide de trouver les cellules verrouillées ?

Dudu2

XLDnaute Barbatruc
Bonjour,
Je n'y crois pas trop, mais à part parcourir les cellules une à une (ce qui n'est envisageable que sur un Range limité) y a-t-il un moyen de trouver le Range des cellules verrouillées d'une feuille ?
Merci.
 

riton00

XLDnaute Impliqué
Un truc comme ça peut-être

VB:
Sub TrouverCellulesVerrouillees()
    Dim cell As Range
    
    For Each cell In ActiveSheet.UsedRange
        If cell.Locked = True Then
            MsgBox "Cellule verrouillée trouvée : " & cell.Address
        End If
    Next cell
End Sub

Slts
 

Dudu2

XLDnaute Barbatruc
Bonsoir @patricktoulon,
Je n'envisage pas de boucler sur toutes les cellules de la feuille, il faudrait des jours de CPU.
En fait je dois retrouver une "plage sécurisée" (multi-areas éventuellement) dans une feuille protégée.
Ce sont les cellules verrouillées qui la représentent.
J'aurais aimé un SpecialCells mais ça n'existe pas sur le Locked.
C'est pour ça que j'ai dit ne pas trop y croire.
 

Dudu2

XLDnaute Barbatruc
Au moment où je créé cette "plage sécurisée", je la connais et tant que la macro est active sur la feuille je peux la manipuler. Mais c'est quand je perds le contexte, je ne sais pas la retrouver à part un scan de cellules.
Dommage qu'il n'existe pas dans la feuille une propriété de type Tag où je pourrais caser cette info.
 

Dudu2

XLDnaute Barbatruc
Un nom du gestionnaire de noms, c'est rattaché à une feuille ? C'est dans la feuille ou le classeur ?
Le nom que je vais donner doit inclure celui de la feuille pour être spécifique à la feuille.
Quel nom je lui donne ? Comment s'appelle le nom permanent d'une feuille, je sais plus ?
 

TooFatBoy

XLDnaute Barbatruc
Un nom du gestionnaire de noms, c'est rattaché à une feuille ? C'est dans la feuille ou le classeur ?
Franchement, je ne sais pas. C'était juste une idée, à tout hasard. :(
Je pense que tu en sais infiniment plus que moi sur chaque point d'Excel !

Si j'avais une solution, je te l'aurais bien évidemment donnée de suite. ;)
Je sais juste qu'un Nom "fait référence" soit à une feuille soit au classeur.
 

patricktoulon

XLDnaute Barbatruc
un name peut être attaché à une feuille ou le classeur entier
demo.gif


en ce qui concerne le .tag d'une feuille ca existe sous une autre forme ce sont les customproperties
 

Staple1600

XLDnaute Barbatruc
Bonsoir @Dudu2, le fil

On peut le faire sans VBA
Avec CTRL+F
Format/Protection
et cochez Verrouillée
Et Hop le tour est joué ;)
Verouillée.PNG

NB: Au préalable sélection de toute la feuille, et décochez verrouillée
Puis verrouillez quelques cellules avant de faire le CTRL+F
 

Discussions similaires

Statistiques des forums

Discussions
312 452
Messages
2 088 544
Membres
103 880
dernier inscrit
rafaelredsc