This is what I have:
For Each cell_Check In range_ValidRows
'''set the variables required for the method and error check'''
If Not IsNumeric(cell_Check.Value) = False And cell_Check.Value > 0 Then
int_FirstYear = cell_Check.Value
Else
Next cell_Check
End If
If Not IsNumeric(cell_Check.Value) = False And cell_Check.Value > 0 Then
int_FirstYear = cell_Check.Value
Else
Next Cell_Check
End If
If Not IsNumeric(cell_Check.Offset(0, 1).Value) = False And cell_Check.Offset(0, 1).Value > 0 Then
int_Frequency = cell_Check.Offset(0, 1).Value
Else
Next Cell_Check
End If
If Not IsNumeric(cell_Check.Offset(0, 2).Value) = False And cell_Check.Offset(0, 2).Value > 0 Then
int_Spread = cell_Check.Offset(0, 2).Value
Else
Next Cell_Check
End If
If Not IsNumeric(cell_Check.Offset(0, -1).Value) = False And cell_Check.Offset(0, -1).Value > 0 Then
long_Cost = cell_Check.Offset(0, -1).Value / cell_Check.Offset(0, 2).Value
Else
Next cell_Check
'''Continues with the rest of the function code
End If
What I want to do is ensure these cell are valid if they are run the function on that row, if their not skip to the next row
Bookmarks