title: Automatic Goal Seek Over Range of Cells
body: <p>I want to apply goal seek across several rows when there is a change to any cell in the work sheet.  I want to apply this from row 7 to row 11.  The first problem I have is that excel is crashing each time I run this.  I am just starting to learn VBA so any help is much apreciated.  Thank you!</p>
  
  <p>My code is below:</p>
  
  <pre><code>Option Explicit
  
  Private Sub Worksheet_Calculate()
  CheckGoalSeek
  End Sub
  
  Private Sub CheckGoalSeek()
  Range("T7").GoalSeek Goal:=0, ChangingCell:=Range("V7")
  End Sub
  </code></pre>