Is Excel running? If not, then open it.

[Carrion]

I need code to check and see if excel is running. If so then activate it. If not then open a new spreadsheet and activate it.

thanks

 

[RoyVidar]

A keyword search, or browse the helpfiles, for createobject and getobject would probably prove worthwhile.

Roy-Vidar

 

[Carrion]

I have searched for quite a while, to no avail. Does anyone know a good thread that they could recomend for me?

 

[RoyVidar]

Something like this?

[tt]dim xl as object
on error resume next
' get current instance of excel
set xl=getobject(,"excel.application")
if err.number<>0 then
' excel not open, then create an instance
err.clear
set xl=createobject("excel.application")
if err.number<>0 then
' excel not installed?
err.clear
exit sub
end if
end if
on error goto <your error handler>
'...[/tt]

- typed not tested

Roy-Vidar