Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Stop Code
Excel Experts, I want to stop my procedure if the first sub procedure finds a cell that is empty. I have been able to make my code exit the first sub procedure when it finds the empty cell, but the code then resumes with the second sub procedure. Is there a way I can make the whole procedure stop. My code is similar to the following: Sub RunCheckBlankAndProcess() CheckBlank Process1 End Sub Sub CheckBlank() Set FirstRow = Cells.Find(What:="SymSide").Offset(1) If IsEmpty(FirstRow) = True Then Exit Sub End If End Sub Sub Process1() (Process 1 Code) End Sub Thanks, Alan -- achidsey |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Stop Code
Sub RunCheckBlankAndProcess()
if CheckBlank Then Exit sub Process1 End Sub Function CheckBlank() Set FirstRow = Cells.Find(What:="SymSide").Offset(1) CheckBlank = IsEmpty(FirstRow) End Function -- Regards, Tom Ogilvy "achidsey" (notmorespam) wrote in message ... Excel Experts, I want to stop my procedure if the first sub procedure finds a cell that is empty. I have been able to make my code exit the first sub procedure when it finds the empty cell, but the code then resumes with the second sub procedure. Is there a way I can make the whole procedure stop. My code is similar to the following: Sub RunCheckBlankAndProcess() CheckBlank Process1 End Sub Sub CheckBlank() Set FirstRow = Cells.Find(What:="SymSide").Offset(1) If IsEmpty(FirstRow) = True Then Exit Sub End If End Sub Sub Process1() (Process 1 Code) End Sub Thanks, Alan -- achidsey |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Stop Code
Tom, Thanks for the help. Alan -- achidsey "Tom Ogilvy" wrote: Sub RunCheckBlankAndProcess() if CheckBlank Then Exit sub Process1 End Sub Function CheckBlank() Set FirstRow = Cells.Find(What:="SymSide").Offset(1) CheckBlank = IsEmpty(FirstRow) End Function -- Regards, Tom Ogilvy "achidsey" (notmorespam) wrote in message ... Excel Experts, I want to stop my procedure if the first sub procedure finds a cell that is empty. I have been able to make my code exit the first sub procedure when it finds the empty cell, but the code then resumes with the second sub procedure. Is there a way I can make the whole procedure stop. My code is similar to the following: Sub RunCheckBlankAndProcess() CheckBlank Process1 End Sub Sub CheckBlank() Set FirstRow = Cells.Find(What:="SymSide").Offset(1) If IsEmpty(FirstRow) = True Then Exit Sub End If End Sub Sub Process1() (Process 1 Code) End Sub Thanks, Alan -- achidsey |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
stop running code | Excel Programming | |||
Why does code execution stop? HELP! | Excel Programming | |||
Using code to stop a macro. | Excel Programming | |||
stop code execution | Excel Programming |