title image


Smiley Re: Prüfen ob Word schon geöffnet ist bei Übergabe an eine Dokumentvorlage
Teste mal folgenden Code (d.h. Du must das an die WORD-Objektvariablen anpassen):Dim ExcelApp As Object



On Error Resume Next

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

If Err.Number 0 Then

' Excel ist offen

' ggf. weiterer Code

Else

Err.Clear ' Fehlernummer löschen !!!

ExcelApp.Quit

Set ExcelApp = Nothing

End If
Gruß Highnoon

Feedback ist die beste Möglichkeit zu sagen, ob die Antwort geholfen hat!

So lange man zum "Beenden" von Windows erst auf den Start-Button drücken muß,
braucht man sich über Bug's nicht zu wundern.

Aber: "Geht nicht" ist weder eine Fehlermeldung, noch ein Bug der MS-Software!

Access2003- (noch) mit DAO

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: