title image


Smiley Re: Wie kann ich prüfen ob Excel bereits geöffnet ....
Hi,



versuch's mal so:



Dim objWW As Object

On Error Resume Next

Set objWW = GetObject(, "Excel.Application")

If Err.Number 0 Then

Err.Clear

Set objWW = CreateObject("Excel.Application")

objWW.Visible = True

objWW.WindowState = 0

Else

objWW.Activate

objWW.Visible = True

End If



Gruß Stephan

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: