If you don't want to have problems when opening excel files try:
Dim objXLApp As New Excel.Application
Dim objXLBook As Excel.workBook
Dim currentWorksheet As Excel.workSheet
Const ERR_APP_NOTRUNNING As Long = 429
On Error Resume Next
'Set objXLApp =...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.