VBA help needed to highlight cell if value changed by formula

[parabamarv]

Hi.. I have some urgent requirement of VBA code which will highlight the cell value which contains formula referring to other cell. E.g. If any value get changed in A1 then B1 which has formula (=A1) should get highlighted.
Please suggest a solution on this.

 

[pbornemeier]

Since the worksheet_change event does not trap changes due to recalculation, this is a workaround that might suit your needs:
The code must be placed on the codepage of the worksheet that contains the cell being tracked.

Option Explicit
Dim vInitialValue As Variant

Private Sub Worksheet_Activate()
    vInitialValue = Range("B1").Value
    Range("B1").Interior.Color = -4142 'Remove interior color
End Sub

Private Sub Worksheet_Calculate()
    If vInitialValue <> Range("B1").Value Then Range("B1").Interior.Color = vbYellow
End Sub

 

[parabamarv]

Thanks for your support. I will check the same & revert.

Since the worksheet_change event does not trap changes due to recalculation, this is a workaround that might suit your needs:
The code must be placed on the codepage of the worksheet that contains the cell being tracked.

Option Explicit
Dim vInitialValue As Variant

Private Sub Worksheet_Activate()
    vInitialValue = Range("B1").Value
    Range("B1").Interior.Color = -4142 'Remove interior color
End Sub

Private Sub Worksheet_Calculate()
    If vInitialValue <> Range("B1").Value Then Range("B1").Interior.Color = vbYellow
End Sub