# Goal Seek Macro Returning Negative Values?

Nov 8, 2011

I am trying to setup a macro to automate goal seek to calculate the required payment to meet a 12% IRR Lookback at the end of a 10 year period. The problem I am running into is that in multiple scenarios the required return is reached without any excess payment at the 10 year mark so it is returning a negative payment in the goal seek cell. In other words it's adjusting what might be a 13% IRR to a 12% IRR (the minimum return) by showing an expense at the end of the term. I need a way to set it to goalseek with a minimum of 0.

## Populate Cells In A Matrix From Goal Seek Values Based On

Aug 5, 2009

wish to write an VB macro in Excel (2003) that populates a 6 row by 10 column matrix (for a 3 D graph) by inserting values from matrix row column headers in cells in another worksheet and using goal seek to derive a value which will be pasted in the respective cell in the 6X10 matrix

Specific example: Matrix (Row Headers A2 to A7, Column Headers B1 to K1, Cell values are in B2 to K7). Please note row and column headers are numerical values since this is for a 3D graph

Macro to be written

Pick a value (numerical) from row header A3 in Sheet A and paste it in cell B6 in another sheet (Sheet B). Pick anothet value (numerical) from column header D1 in Sheet A and paste it in cell B7 in Sheet B.

Run a goal seek scenario such that cell S10 in sheet B is equal to 50 by changing cell G8 in Sheet B

Copy the value chosen/optimised by Goal Seek from cell G8 in Sheet B and paste it in Cell D3 (which is the relevant cell for the values for intersection of headers A3 and D1) in Sheet A

Macro should populate all cells in the matrix in Sheet A (matrix cells to be populated are B2 to K7) in a similar fashion

The macro should be locked in to the cells which are either being copied from or pasted into so that it still references them even if new columns or rows are inserted.

## Goal Seek Macro For Multiple Rows

Jan 27, 2008

I am trying to get Goal Seek to seek a value on each row as such:

Project 1 : Value 1 : Goal Seek using Value 1
Project 2 : Value 2 : Goal Seek using Value 2
etc....

How do I create one macro that will pick up Value 1, 2 etc and then set the Goal Seek to that value automatically, since Value 1, 2, etc will already be available in a cell? Alternativley there could be a macro that just runs that a Goal Seek for all the rows at once?

## Excel Goal Seek Function For Finding Values To Certain Decimal Place

Feb 17, 2010

Any function in Excel, that would allow me to have a unit cost price (for example: 0.5432) and then for a table of figures containing the pack sizes to determine the correct unit price that would allow all pack costs to be at 2 decimal places. I have included an example below:

My spreadsheet would look like the following:

Cell A1 (Unit Cost Price) = .5814
Cell A3 (Pack of 75 units) = .5814*75 = 43.605
Cell A4 (Pack of 80 units) = .5814*80 = 46.512
Cell A5 (Pack of 100 units) = .5814*100 = 58.14
and so on

I need some way of making cell A1 change to a value that will cause all cells A3 to A5 to be 2 decimal places or less.

## Build Macro That Iteratively Runs Goal Seek?

Nov 7, 2012

I'm trying to build a macro that iteratively runs a goal seek, then reduces a certain value (Let's call it "Bogey") in a different cell by a small amount (note that changing Bogey will affect the desired goal seek value), then runs the goal seek again, reduces Bogey by a small amount again, etc etc, and keeps running in this loop, with the restriction on this loop being that a different cell, affected by Bogey--let's call it "Constraint"--doesn't drop below a certain amount.

## VBA Goal Seek Macro To Calculate Specific Range Only

Nov 20, 2008

Is there a way to use goal seek in VBA that won't trigger a full model calculation?

I would like to (somehow) perform goal seek, but only recalculate range("A1:B50") say on a single worksheet (where both the input value and the final calculated value is included in that range), as opposed to calculating the whole model inbetween each iteration.

Also, all dependencies between the input value and the final calculated result are contained in that range.

## Goal Seek In VBA With Variables

May 30, 2009

Trying to automate Goal Seek using variables for the three arguments. It's working when I define the cells references & values within the code, but cannot figure out how using variables. I'm sure the example below is incorrect, but will give an idea what I need to accomplish:

GoalCell = Worksheets("Parts").Cells(DestRowID + 10, DestColID)
Value = Worksheets("ICA").Cells(CopyRowID + 13, CopyColID).Value
ChangeCell= Worksheets("Parts").Cells(DestRowID + 9, DestColID)

GoalCell.GoalSeek Goal:=Value, ChangingCell:=ChangeCell

## Goal Seek Formula

Sep 28, 2006

CSS = P divided by S.
PS Required is a number that needs to be added to both S and P to achieve target of 83%

The answer to the below = 5. But i dont know how to get it using a formula
(If 5 is added to S and P both, S will become 36 and P will become 30; 30/36 = 83.33%)

Name S P CSS Target PS required
Adam 31 25 80.65% 83.00% ?

## Goal Seek Cell B1 To Zero By Changing C1

Aug 15, 2008

I need to goal seek cell B1 to zero by changing C1.

Then, I need to goal seek cell B2 to zero by changing C2.

Then, I need to goal seek cell B3 to zero by changing C3.

...................

...................

I need to goal seek cell B100 to zero by changing C100.

I don't want to have to perform 100 different goal seeks. Is there a way to do them all at once?

## Using Goal Seek On Userform With Variables

Apr 6, 2013

Goal seek function

Code:
Worksheets("Sheet1").Range("Polynomial").GoalSeek _
Goal:=15, _ ChangingCell:=Worksheets("Sheet1").Range("X")

Is it possible to modify this such that I can use variables? For example, the variables are 'left term', 'right term' and 'sigma max' .

I want to set the value of the following equation 'left term - right term' to 0 by changing variable 'sigma max' Everything is done on the userform and not in the spreadsheet.

(Note: In spreadsheet format, the above query is equivalent to setting a cell which has a formula to 0 by changing the value in another cell, fairly simple).

## Seeking A Formula Instead Of Having To Use Goal Seek?

Jun 4, 2014

Say employee John Doe has a salary X. Giving him a salary raise Y (euro/dollar) induces a pension premium to be paid by the employer, on that amount.

The premium is (fixed) 17% of the part above a (fixed) treshold value of 3.750. On the part of the raise below the 3.750, the pension premium is (fixed) 4,35%.

E.g. having a salary of 3.600, with a raise of 400.
4,35% of (3.750 - 3.600 = 150) equals 6,525
And 17% of the remaining 250 equals 42,500
So the total premium is 49,025

But, I want to give a raise with a total cost of no more than 400. So, I use goal seek to find a raise that, together with te pension premiums equals 400.

In the example, with 3.600 as a salary to start with, that raise would be 358,10 Because the part below 3.750 stays the same and induces a premium of 4,35% of 150, being 6,525 and the remaining part is 208,10 at 17% is 35,377.

Proof: 358,10 + 6,525 + 35,377 = 400

The question is: is there a possibility to have a formula that calculates the (e.g.) 358,10 based on a salary to start with (e.g. 3.600), an aimed total cost (e.g. 400) and the fixed constants 3.750, 17% and 4,35%?

## Goal Seek With Complex Numbers

May 24, 2008

I'm trying to understand how complex numbers are handled/processed in Excel.
As related to my application, an interesting exercise would be to use Goal Seek w/s command to find the roots of the equation:
X^2 + 4 = 0
setting the (rounded) value in cell A2 to 0 by changing A1

A1:: 1+i
A2:: =COMPLEX(ROUND(IMREAL(IMSUM(IMPOWER(A1,2),4)),6),
ROUND(IMAGINARY(IMSUM(IMPOWER(A1,2),4)),6))
Obviously a conventional or direct use of Goal Seek wouldn't work since Excel treats complex numbers as text.

Perhaps, one should use Goal Seek twice in this case:
first: find the coefficient "a" for IMREAL(A2) = 0
second: find the coefficient "b" for IMAGINARY(A2) = 0
and the root would be "a+bi".

## Goal Seek VBA Syntax - With / Without Parentheses

Nov 25, 2008

I've been playing around with GoalSeek in VBA because of this thread and found something about the syntax that I don't understand.

If I want to find out whether GoalSeek worked, I can use

Ok = Range("B1").GoalSeek(Goal:=10, ChangingCell:=Range("A1"))
Debug.Print Ok
This requires parentheses around the GoalSeek arguments.

If I just want to do the GoalSeek, then I need

Range("B1").GoalSeek Goal:=10, ChangingCell:=Range("A1")
with no parentheses. Why? The Help says that GoalSeek returns True if it works, and the proforma syntax includes parentheses, but then the only example uses the syntax without parentheses.

## Multiple Cell Goal Seek

Jan 22, 2009

I need to use a Multiple Cell Goal Seek.

I used the code from this site.

Here is the ....

## Goal Seek Across Multiple Rows

Feb 12, 2010

Is there a way to "copy" Goal Seek acroos multiple rows?

I have used Goal Seek in the first row. However this spreadsheet is several
hundred lines long and using it like this is not practical.

I want to seek a goal value of 30% on the cell that I called �c�, and I want the result of the goal seek to be put in the cell situated on the same row, 6 columns before.

This is the code that I tried to write, registering and saving the �goal seek� operation for one row.

Is it clear enough?

What i wrote:

Sub Macro1()
'
' Macro1 Macro
' Macro recorded 12/02/2010 by Whirlpool Europe Srl
'
' Keyboard Shortcut: Ctrl+w
'
On Error Resume Next

For Each c In ActiveWorkbook
If cvalue < 0.3 Then

Range("c").GoalSeek Goal:=0.3, ChangingCell:=Range offset(c,0,-6)

Next c

End Sub

## Automatically Goal Seek Whenever Changes Are Made

Oct 18, 2003

I have created the following in an effort to automatically goal seek whenever changes are made to the cell C2.

Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Row = 3 And Target.Column = 2 Then
Range("D19").GoalSeek Goal:=Range("C2").Value, _
ChangingCell:=Range("D3")
End If
End Sub

As far as I know, the Macro is running all of the time? When I use goal seek manually it works fine. Assuming the above is running, when I change the value in C2 nothing happens. Does the fact that I have a three sheet workbook make any difference? I am sort of lost. By changing the value in C2 I want Excel to change the value in D19 to match C2 by adjusting D3.

Application.EnableEvents = False
Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Row = 3 And Target.Column = 2 Then
Range("D19").GoalSeek Goal:=Range("C2").Value, _
ChangingCell:=Range("D3")
End If
End Sub
Application.EnableEvents = True

Doesn't seem to work either. However, I don't really know if other settings in the workbook are correct.

## Goal Seek Automation On Range Of Cells

Apr 1, 2013

I wanted to set up a macro to automate goal seek on a range of cells. I've attached a short extract below of the spreadsheet I'm working on (the full one has a few thousand lines of data) which I hope illustrates what I'm trying to do.

jan
feb
mar
apr
may
jun
jul
aug
Avg
New Avg

0
0
0
0
0
0
0
0
0
0

34
20
43
43
43
43
43
43
35
39

[Code] ...........

## Advanced Goal Seek: Two Cells Missing Highlighted In Blue

May 8, 2007

I have the total sales for a company. Then I have four specific segments that fall under those sales. Two out of the four segments I have exact sales figures for. The other two segments I just have the year-end sales and the dollar increase in each quarter. Is there a way to solve in excel for the missing quarters. So each of the four segments would have to add up to the total sales for both the quarter and the year. I've attached my example spreadsheet too. There are two cells missing highlighted in blue but i'm going to try to obtain that data. provided i fill in those two blanks, is there way to back into the rest of this spreadsheet?

## Userform Listbox: Check Wether Range Have Negative Values Or Not If Yes Load All Negative Values In The Listbox1 By Clicking Checkbox

Jan 19, 2009

I have data in range J2:J365 , H368:H401 & J403:J827. i want to check wether this range have negative values or not if yes load all negative values in the listbox1 by clicking checkbox.

## Macro: Change Positive Values To Negative

Feb 6, 2007

I use data on a text file and import this into Excel and use a macro to format. The data lists invoices and credit notes and their dollar value.

Due to a fault in the program that creates the text file all dollar amounts are shown as positive figures. Credit note amounts should correctly be shown as negative figures.

The invoice number format is 8 characters beginning with a letter and credit notes begin with a number.

Is there macro code that will change credit note values to a negative figure?

## Formula Returning Negative Time

Aug 9, 2009

the Times work fine 22:00pm to 5:30am or 6:00am to 5:30am

Formulas
J4

=IF(ISNUMBER(D4),(D4>E4)*MEDIAN(0,E4-N\$4,O\$4-N\$4)+MAX(0,MIN(O\$4,E4+(D4>E4))-MAX(N\$4,D4))-F4-L4,0)

K4

=IF(ISNUMBER(D4),MAX(0,MOD(E4-D4,1)-J4-L4-M4-I4-F4),0)

L4

=IF(ISNUMBER(D4),IF(MOD(E4-D4,1)-F4>P\$4,(MOD(D4+P\$4,1)>E4)*MEDIAN(0,E4-N\$4,O\$4-N\$4)+MAX(0,MIN(O\$4,E4+(MOD(D4+P\$4,1)>E4))-MAX(N\$4,MOD(D4+P\$4,1))),0),0)

M4

=IF(ISNUMBER(D4),MAX(MOD(E4-D4,1)-F4-I4-L4-P\$4,0),0)

but if I try 22:00pm to 6:00am or later

The following is displayed

Negative Time in J4 and the wrong result in K4

this is not what I need

It should be showing the following

J4 2:00 K4 5:00 L4 00:00 M4 00:00

## Selecting First Negative Number In Row And Returning Associated Column Value?

Feb 10, 2014

I have row of dates and underneath those dates I have a row of numbers. The numbers count down. For example:

[Code] .....

At the end of the row I want a cell to return the date that the row first started going negative at. In this example, it should display 10/31/2014 (for when it went to -60).

## Ranking With Duplicate Values While Ignoring Zeros And Negative Values

Mar 26, 2014

I'm trying to rank the values in cells S32:S38 in ascending order while ignoring zeros and negative values. I also need to rank duplicate values with a unique ranking, so that no ranking value is repeated. I tried the formula below, but the ranking values start at "2" instead of "1" and I can't figure out how to fix it.

Formula:

[Code] ....

## Convert Absolute Values To Negative Values Based On Criteria

Aug 14, 2008

is it possible to write a macro that will convert absolute values into negative based on criteria? Data gets downloaded from in house system which comes out as all absolute values, now i need the macro to covert absolute values to negative if the amount is either "Our Reciepts" or "Our Delivery"

Below is a small sample of data, real data is around 100 rows

Col DCol EOur Receipts1231Our Delivery1231Delivery Settlement1323

## Use Vlookup For Negative Values Or A Range Of Values?

Oct 27, 2008

i want to put a subject for a negative values, how should i do it?

For example:

lookup_value: -1000
table_array:
<0 - Poor
0-10000 - Good
> 10000 - excellent

is it possible to do this? ALternatively see the (new) attachment for clearer question.

## Convert Positive Values To Negative Values

Apr 7, 2008

I have a table (column C5 to H20)

The table has values in each cell. Some cells have zero values and some have positive values.

Basically, I need to convert all positive (non zero) values to Negative values using VBA (i.e. convert 251 to -251).

## Sum Negative Values IF

Dec 11, 2003

Using Excel 97, Is there a way to Sum the values in columns if the value in cell B is a negative number. I want the total placed in their respected columns after excel finds 8 Consecutive Blank rows.

Ex

B1:B70 (remember the number can change it can also be B1:B80)

B1:B70 is a positive value, but then B85 is negative so begin the calculation from that point.

Sum B85,F85,G85,H85,I85,J85,K85,L85,M85,Q85,R85. And place the value in their corresponding cell after 8 consecutive blank rows appear in row B.

## If Statements With Negative Values

Dec 8, 2009

I need an if statement that says if cell a1 is Blank or negative, if true a2, if false a3

## Positive And Negative Values

Sep 3, 2009

way using vba to match a -negative value to a postive value in a same column and delete the entire row? (debits and credits)

## Sum To Ignore Negative Values

Apr 18, 2008

I am trying to figure out how to ignore a #VALUE! error in my OR formula. I am using this formula for conditional formatting and I don't want to correct the error because I am using the errored out cells as a fourth conditional format since you can only use three in excel. This is my formlua:

=OR(N4>0,O4>0,P4>0,Q4>0,R4>0,L4>0,Q4>0,K4>0)

How can I modify this formula so that the whole formula doesn't error out if one of the cells has #VALUE! in it?