Skips the macro Call

[HunterN]

I have a macro that asks the user is they want
to enter another project into the Userform
input boxes. If the user selects 'Yes' then it is suppose to Call a macro that will clear the fields. My problem is sometimes the macro just skips over the Call. I can even watch it in debug, where CheckMsg will = 6 and it should go outside the If statement and excute the next command but it doesn't. Any answers to this one?

Below is the code in the program:
Sub Add()
.
.
CheckMsg = MsgBox("Do you want to Enter another Project?", vbYesNo + vbQuestion)
If CheckMsg = vbNo Then
Call Clearboxes

Unload Frm2_Add
Frm1_Main.Show
Exit Sub
End If

Call Clearboxes
end sub

 

[Barrie Davidson]

On 2002-10-01 11:57, HunterN wrote:
I have a macro that asks the user is they want
to enter another project into the Userform
input boxes. If the user selects 'Yes' then it is suppose to Call a macro that will clear the fields. My problem is sometimes the macro just skips over the Call. I can even watch it in debug, where CheckMsg will = 6 and it should go outside the If statement and excute the next command but it doesn't. Any answers to this one?

Below is the code in the program:
Sub Add()
.
.
CheckMsg = MsgBox("Do you want to Enter another Project?", vbYesNo + vbQuestion)
If CheckMsg = vbNo Then
Call Clearboxes

Unload Frm2_Add
Frm1_Main.Show
Exit Sub
End If

Call Clearboxes
end sub

Change your code from:

CheckMsg = MsgBox("Do you want to Enter another Project?", vbYesNo + vbQuestion)
If CheckMsg = vbNo Then
Call Clearboxes

to:

CheckMsg = MsgBox("Do you want to Enter another Project?", vbYesNo + vbQuestion)
If CheckMsg = vbNo Then Call Clearboxes


Regards,