Voir l'états des cellules ( vérouillés ou non )

[tuti]

bonsoir
existe il une méthode pour voir l'état des cellules ( vérouillés ou non ) ( dans les menus )
car je protége mon document et je souhaite vérifier d'un coup d'oeil que je n'oublie aucune cellules avant sa diffussion

merci

 

[jeanpierre]

Re : Voir l'états des cellules ( vérouillés ou non )

Bonsoir tuti,

Regarde du côté de Edition/Atteindre/Cellules pour voir si l'option "cellules non protégées" existe.

En tous cas elle n'existe pas sous la version 2000.

Peux pas faire mieux.

Bonne soirée.

Jean-Pierre

 

[BOISGONTIER]

Re : Voir l'états des cellules ( vérouillés ou non )

Bonsoir,

-Sauvegarder le classeur en PJ
-L'ouvrir
-Une BO doit apparaitre
-Ouvrir le classeur à vérifier
-Cliquer sur le bouton de la BO
-Les cellules non verrouillées sont sélectionnées

Sub SelectVer()
  Set champ = Nothing
  For Each c In ActiveSheet.UsedRange
    If Not c.Locked Then
      If champ Is Nothing Then
        Set champ = c
      Else
        Set champ = Union(champ, c)
      End If
    End If
  Next c
  champ.Select
End Sub

JB

 

[ROGER2327]

Re : Voir l'états des cellules ( vérouillés ou non )

Bonjour à tous

Pour le cas où on testerait une feuille dont toutes les cellules sont verrouillées, remplacer la ligne 12

[COLOR="DarkSlateGray"][B]  champ.Select[/B][/COLOR]

par

[COLOR="DarkSlateGray"][B]  If Not champ Is Nothing Then champ.Select[/B][/COLOR]

ROGER2327
#2818