i have to use something to END a program. how ever using end isnt workin!
so basically...if the values entered aren't numbers i want the program to STOP! how do i do tht???
using Mircrosoft excell 2003, vba
thanks
Code:
While ActiveSheet.Cells(Row, COL_DATA) > 0
ActiveSheet.Cells(ROW_NUMDISKS, COL_DATA) = InitialRadiusValue + NewRadiusValue
InitialRadiusValue = InitialRadiusValue + NewRadiusValue
Row = Row + 1
If ActiveSheet.Cells(Row, COL_DATA) < 0 Then
ActiveSheet.Cells(ROW_NUMDISKS, COL_DATA) = "Sorry, one or more cells do not contain a real radius"
End If
If Not IsNumeric(ActiveSheet.Cells(Row, COL_DATA)) Then
ActiveSheet.Cells(ROW_NUMDISKS, COL_DATA) = "Sorry, one or more cells do not contain a real radius"
End If
End
so basically...if the values entered aren't numbers i want the program to STOP! how do i do tht???
using Mircrosoft excell 2003, vba
thanks
Comment