Chcę zastosować wyszukiwanie celu w kilku wierszach, gdy następuje zmiana dowolnej komórki w arkuszu roboczym. Chcę zastosować to od wiersza 7 do wiersza 11. Pierwszym problemem, jaki mam, jest to, że Excel się zawiesza za każdym razem, gdy go uruchamiam. Właśnie zaczynam uczyć się VBA, więc każda pomoc jest bardzo doceniana. Dziękuję Ci!

Mój kod jest poniżej:

Option Explicit

Private Sub Worksheet_Calculate()
CheckGoalSeek
End Sub

Private Sub CheckGoalSeek()
Range("T7").GoalSeek Goal:=0, ChangingCell:=Range("V7")
End Sub