[FAQ's: OD] How do I detect if an Office app is already running/created?

[MarMan]

Here is an alternate:

    Private Function CheckExcel() As Boolean

        If UBound(Diagnostics.Process.GetProcessesByName("Excel")) > 0 Then
            Return True
        Else
            Return False
        End If

    End Function