Goal Seek VBA Help

[howiwonder]

Hello --

I am trying to set up a goal seek macro with the following specs:

individual goal seeks needed, for each column

I need to set cell c13 to 0 by changing cell c14, and then set d13 to 0 by changing d14, etc. through to column GE.

Can you help?

Thank you!

 

[Rhodie72]

Hello --

I am trying to set up a goal seek macro with the following specs:

individual goal seeks needed, for each column

I need to set cell c13 to 0 by changing cell c14, and then set d13 to 0 by changing d14, etc. through to column GE.

Can you help?

Thank you!

Goal seek is part of the Excel Add-ins that Ship with every version after Excel 2007. writing a goal seek would be re-inventing the wheel.

 

[howiwonder]

Goal seek is part of the Excel Add-ins that Ship with every version after Excel 2007. writing a goal seek would be re-inventing the wheel.

Yes, but what you're proposing requires 185 iterations of goal seek. I am trying to find a vba solution that runs the goal seek in sequence. Please advise, thank you!

 

[shg]

Maybe ...

Sub hw()
  Dim cell As Range
  
  For Each cell In Range("C13:GE13").Cells
    cell.GoalSeek Goal:=0, ChangingCell:=cell.Offset(1)
  Next cell
End Sub

 

[howiwonder]

Maybe ...

Sub hw()
  Dim cell As Range
  
  For Each cell In Range("C13:GE13").Cells
    cell.GoalSeek Goal:=0, ChangingCell:=cell.Offset(1)
  Next cell
End Sub

yes!!! thank you very much!

 

[shg]

You're welcome.