Hello all,

I have a subroutine like the following:

----------------
Sub AbsTest(fn As String, sec As Long)

Dim resPath As String
Dim mSheet As Worksheet, resultSheet As Worksheet
Dim mBook As Workbook

Set mSheet = ActiveSheet

AbsTestString fn, sec
' AbsTestString is where the actual work is done; it
' saves result data to a simple text file called abstest.txt.

Set mBook = Workbooks.Open("abstest.txt") ' Read the text file
mBook.ActiveSheet.Copy Befo=mSheet ' Copy to this book
mBook.Close False ' Close the text file
' without save prompt

Set resultSheet = ActiveSheet
'<Process the data in resultSheet, which was copied into this book
Application.DisplayAlerts = False
resultSheet.Delete
Application.DisplayAlerts = True

End Sub
----------------

The sub is repeated several times in a loop, with varying values for
fn and sec.

Now, this works faultlessly most of the time. But occasionally,
execution stops after abstest.txt has been opened -- i.e. it doesn't
get copied to mBook -- without any error message at all. I can see no
pattern to when it works and when it stops -- identical runs of the
outer loop may stop in different iterations, or (usually) finish as it
should.

Any ideas what may be wrong here?


--
OleM