Не работает код VBA с ссылкой на ячекйу формирующуюся другой ячекой

[DenchikZ]

Все добрый день имеется код VBA, где ячейка A1 формируется другой ячейкой, данный код не работает подскажите пожалуйста как можно исправить.
Option Explicit

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Address = "$A$1" Then
        If Range("A1").Value = "42" Then
                       Rows("2:3").EntireRow.Hidden = False
            Rows("4:5").EntireRow.Hidden = True
                    ElseIf Range("A1").Value = "48" Then
            Rows("4:5").EntireRow.Hidden = True
            Rows("2:3").EntireRow.Hidden = False
                 ElseIf Range("A1").Value = "52" Then
                        Rows("2:5").EntireRow.Hidden = False
                     
        End If
    End If
End Sub

[Hugo121]

Решили уже, используя событие пересчёта.
Ещё как вариант - можно на эту ячейку завязать текстбокс, и использовать его события. Это когда например данные приходят по DDE