Protection de cellules en fonction de l`heure?

[cheri2005]

Bonjour,

Toutes les demi-heures, je dois rentrer des valeurs dans des cellules differentes, et je souhaiterais les proteger, une fois le delai de temps passe.
C.a.d avoir 5-10 min pour modifier la valeur a la date T1, et ne plus pouvoir modifer la cellule une fois ce delai ecoule.

Pour l`instant, je n`arrive pas mieux que de bloquer la valeur de la cellule une fois celle-ci rentree

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Address(False, False) = 'F10' Then
ActiveSheet.Unprotect
Target.Locked = True
Target.FormulaHidden = False
ActiveSheet.Protect Contents:=True
End If
End Sub

Merci d`avance pour votre aide.

 

[Riddick]

Salut cheri2005


:silly:

Je me disais étant donné que

MID(Now,1,10) donne la date du jour
MID(Now,12,5) donne la l'heure du moment
MID(Now,15,2) donne les minutes du moment

Si tu veux pouvoir changer la cellule F10 toutes les heures pendant 5 min

If MID(Now,15,2) <5 AND MID(Now,15,2)>0 then
ActiveSheet.Unprotect
end if

Enfin moi j'essaierai comme ca un truc dans le genre
En esperant t'avoir amener quelques elements de reponses...