Pls check if excel is running in the background invisibly.

Use MyXL.UserControl = false before you quit

BTW read up on the GetObject, since with excel allows the following:

Dim wb as Object

Set wb = Getobject("c:\Myfile.xls")

you could directly test if a quotation is open by connect to that
quotation.

Dm Unseen