I have a Function Func1 which calls a procedure Proc1. Func1 find all ".txt" file names from a folder and import them onebyone. When an error occurs in Proc1 (for ex. a wrong format of one of the txt files) i want to stop the execution of code from func1 and not only the code from proc1. Thanks.

Without seeing you code, it will be difficult to be very specific.

I would change the Proc1 to a funtion so that you can pass back it it was successful. Then in the Func1 yo ucan aadd error handling.



Boyd
"Hi Tech Coach"
Access Based Accounting/Business Solutions developer.
http://www.officeprogramming.com

Ok, Boyd , but how should look the error handling code from Func1 to stop execution if an error ocured in Proc1(which is a function now, let's say Func2)?
Whith the code below, every time I get an error in Func2 (let's say that one of the .txt files doesn't exist) the application continue to run and import the rest of the files.
Func1()

On Error GoTo ErrHandle
Do While
---some code to select a file from a folder
Call Func2()
Loop

Exit Function
ErrHandle:
    MsgBox Err.Description
        ExcelWorkbook.Close
        Set ExcelWorkbook = Nothing
        ExcelApp.Quit
        Set ExcelApp = Nothing
    Exit Function

End function


Func 2()

---code to import .txt file.

End Function