Why do I get Code Excution has been interupted

C

Chris Freeman

I wrote some quick code to open files and count some rows, and now, for every
file opening, I get a "Code Execution has been interupted" message. I didn't
have any code break in the code previously, and can't seem to get ride of
them. I tried doing a debug, and then saving for the heck of it, but it still
stops there next time around.

here's what runs the first stop:

' Open the file dialog
With Application.FileDialog(msoFileDialogOpen)
.AllowMultiSelect = False
.Title = "Select the original Funds Ops Check Request file"
.Show
For lngCount = 1 To .SelectedItems.Count

then I hit continue and it stops some 8 lines later:

'Open workbooks
Funds_Ops = "\\sandprdob01\StdReg\Outbound_Escheat\Escheat_Trust_out.csv"
Workbooks.Open Filename:=Funds_Ops
FO = ActiveWorkbook.Name


And then again here:
Workbooks.Open Filename:=Trust_Acct
TA = ActiveWorkbook.Name


Then it finishes the rest of the code. Am I missing some code here?

Thanks
 
J

Jacob Skaria

Hit reset in VBE. Save and close the workbook. Reopen and try again...Place
your code in between as below and try.

Sub Macro()
Application.DisplayAlerts = False

'place your code here

Application.DisplayAlerts = True
End Sub
 
C

Chris Freeman

Jacob,
I placed the displayalert = false and =true in the code, but same thing: I
get the error watch. I don't know how/where/what to reset VBE. Where is that?

Thanks
 
C

Chris Freeman

Jacob,
I don't see a reset in the VBE, so if its there, and you want to point it
out, I'd appreciate it.

Thanks
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top