Conditional statements
I am a beginner and I am trying to write a conditional
statement that verifys whether or not a cell has a value
greater than zero. If it does, the program contiues to
the output page. If it doesnot, a separate error sheet
pops up that directs the user to return to the sheet and
enter a value. The error sheet appears evey time even if
thecell is greater than zero.
2 Questions.
1. Is their a better way to do this with a message box
that would appear as opposed to referring it to a separate
sheet, and;
2. What is the problem with my program (see below)
Sub Continue_inputs_to_outputs()
'
' Continue_inputs_to_outputs Macro
' Moves the user from the input sheet to the output sheet
provided all the information is complete
'
Sheets("Input Fields Competitve").Select
If Labor_cost 0 Then
Sheets("LPA Competitive Output").Select
ActiveWindow.SmallScroll Down:=-15
Range("G4:R5").Select
Else
Sheets("Warning Page").Visible = True
Sheets("Warning Page").Activate
Range("i20").Select
End If
End Sub
|