Here is your problem

If Sheets("IncStmtAssump").Range("C2:C50").Value = "Input"

will give a type mismatch error since you are comparing an array to a
string.

You need to check one cell at a time.

--
Regards,
Tom Ogilvy

"bruce forster" wrote in message
...
This is a similar post to one yesterday but with the new infor. someone
might be able to help.

I am creating a financial projection model and need a single line of code
that will run a formula based on an assumption "driver" unique to each line
item in the financial statement. For instance, if C2 is "Input" then do "x"
if C2 is "% of Revenue" do "y" etc and this test must run for each line in
the financial statement.

Here is what I have written but i get a "type mismatch" error and the same
# is returned for each line item.. Please help.

Sub ProjCal()
If Sheets("IncStmtAssump").Range("C2:C50").Value = "Input" Then
Sheets("Sheet3").Range("B3:B50").Formula = "='IncStmtAssump'!D2"
If Sheets("IncStmtAssump").Range("C2:C50").Value = "% of Revenue"
Then Sheets("Sheet3").Range("B3:B50").Formula =
"='IncStmtAssump'!D2*'Sheet3'!D2"
End Sub

In advance Thanks.