If / Then / Else Macro

M

Mike Cross

The problem:
I have a Macro that does a Goal Seek and crashes if one
of several cells has a 0 or no value in it

EXISTING MACRO:
Application.ScreenUpdating = False
Sheets("Program Input").Select
Sheets("Cash Flow").Select
Range("D49").Select
Range("D49").GoalSeek Goal:=1, ChangingCell:=Sheets
("Program Input").Range( _
"J192")
Sheets("Program Input").Select
Range("J192").Select
Application.ScreenUpdating = True
End Sub

I am trying to write code into the macro that will check
to see if the values in any of five different cells is
equal to 0 or blank -> If ANY are then STOP the Macro.
Otherwise run the Macro. I assume you need an
If /Then/Else at the begining of the existing Macro

Thanks in advance for any help you can provide.
 
Top