valeurs "bloqués"

[Cruz]

(re) bonjour tout le monde

j'aimerais bien savoir s'il est possible de 'bloquer' la valeur d'une cellule grace à une macro. c'est-à-dire que la valeur de la cellule ne change plus, que la valeur reste la meme et que la formule n'existe plus: exemple
A1=A4*A5/3
A4 = 3
A5 = 6

donc A1 = 6
j'aimerais que : si B1 =1, A1 soit bloqué, sa formule est modifiée : A1 = tout simplement 6 (peut importe les valeurs de A4 et A5 puisque la cellule est 'bloquée').

j'éspère que ce n'est pas trop confus
merci d'avance
a+
cruz

 

[dg62]

Bonjour Cruz

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

If Range('B1').Value = 1 Then
    Range('a1').Value = Range('A1')
End If

End Sub

ce code supprime la formule et la remplace par la valeur calculée dès que B1 prend la valeur 1

 

[Top Gun]

Bonjour,

Je me permets d'intervenir pour demander un complément: Comment s'y prendre pour que le résultat en A1 soit bloqué et verrouillé, donc inchangeable si B1 prend la valeur 1, et si B1 prend n'importe quelle valeur ?

Merci.

 

[Cruz]

merci beaucoup

c'est exactement ce que je cherchais

bonne journée
a+
cruz