Bloquer sur feuille protégé cell libéré par defau

DERKOO · 23 Juin 2005

Bonjour forum

Est- il possible de bloquer des cellules, qui à l´origine sont définis comme libérés sur une feuille protégé, une fois remplie?

Genre l ideal serait si la condition 1 est atteint:
- Sur feuille déjà protégé, bloquer toutes les cellules qui ont été remplies..
Comme ca y a pas de changement posssible..

MErci d avance

Antoine

Creepy · 23 Juin 2005

Bonjour Derkoo, le Forum,

Ce petit bout de code devrait t'aider !

Dim FullCell As Variant
ActiveSheet.Unprotect
For Each FullCell In Range('a1:c11')
    If FullCell <> '' Then
      FullCell.Locked = True
    Else
      FullCell.Locked = False
    End If
Next
ActiveSheet.Protect DrawingObjects:=True, Contents:=True

Attention je n'ai pas mis de protection par mot de passe et j'ai juste fait le test sur quelques cellules.

++

Creepy

DERKOO · 23 Juin 2005

Merci Creepy

je vais le tester tout de suite

Bloquer sur feuille protégé cell libéré par defau

DERKOO

XLDnaute Junior

Creepy

XLDnaute Accro

DERKOO

XLDnaute Junior

Discussions similaires