Goal Seek updating cell value incorrectly

[pawanhsharma]

Hello Everyone,

I am working on a financial file where I want to update a table by doing Goal Seek by changing a cell value. I am using below VBA Code. The code running fine and updating the table properly, also debug.print also showing correct result. however the cell which is suppose to change is showing incorrect value.
my code is

Sub Goal_Seek()
Dim Rrow As Range
With ThisWorkbook.Sheets("Calculation Model")
Set Rrow = .Range("G36:G101").Find(What:=Range("C12").Value, LookIn:=xlValues)
End With
'Do Goal Seek for obtaining
'Debug.Print Rrow.Row
'Debug.Print Range("L" & Rrow.Row).Value
Range("L" & Rrow.Row).GoalSeek Goal:=0, ChangingCell:=Range("C6")
End Sub

I want to update cell C6 value to update desired referance value to 0 (Zero)

 

[GlennUK]

Show what is in C6 before running, what the Debug prints output, what C6 shows after running, what is in the L&Rrow.Row cell after running, and how exactly the macro is "updating the table properly"?

 

[pawanhsharma]

Cell c6 is having a percentage value to calculate interest rates. The lrow and table is calculating repayment schedule. My goal to have value 0 in outstanding against the due payment. When I am running the macro the table is adjusting but the value in desired cell is showing some value in minus.
I will get back to my computer and post the example. Hope that will help. I am not good in these statical and financial formulas ?

 

[MARK858]

What sheets are Range("C12").Value, Range("L" & Rrow.Row) and Range("C6") on? and what sheet is active when the code runs?

 

[pawanhsharma]

What sheets are Range("C12").Value, Range("L" & Rrow.Row) and Range("C6") on? and what sheet is active when the code runs?

They are all same worksheet.