Prüfen ob Powerpoint geöffnet ist

Moderator: ModerationP

Prüfen ob Powerpoint geöffnet ist

Beitragvon MHed » 31. Mai 2021, 14:21

Moin zusammen,

ich benötige Eure Expertenhilfe für folgendes Problem.

Für eine Applikation möchte ich feststellen, ob PowerPoint geöffnet ist, bevor ein Makro ausgeführt wird.

Kann mir da jemand helfen, meine bisherige Recherche im Netz war ohne Erfolg. Was ich gefunden habe bezog sich immer darauf, ob eine konkrete Datei geöffnet ist.

Für Eure Unterstützung bedanke ich mich schon jetzt.
herzlichen Dank und beste Grüße :D
Martin


"Aufgeben ist das Letzte was man sich erlauben darf!"
MHed
Im Profil kannst Du frei den Rang ändern
 
Beiträge: 122
Registriert: 08. Okt 2015, 08:57

Re: Prüfen ob Powerpoint geöffnet ist

Beitragvon Fen » 01. Jun 2021, 09:37

Hallo,

im Taskmanger kann das geprüft werden.

Mit VBA:

- API
- Word: Liste aller Tasks
- CMD

Was für dich am besten ist, hängt von den Vorkenntnissen ab.

mfg
Fen
 

Re: Prüfen ob Powerpoint geöffnet ist

Beitragvon DerHoepp » 01. Jun 2021, 12:51

Moinsen auch von mir,

ein einfaches GetObject innerhalb einer Fehlerunterdrückung funktioniert auch. Problematisch wirds erst bei zwei Powerpoint-Prozessen, die du gesondert behandeln willst:
Code: Alles auswählen
Sub test()
    Dim ppt As Object
    On Error Resume Next
        Set ppt = GetObject(, "Powerpoint.Application")
    On Error GoTo 0
    Debug.Print ppt Is Nothing
End Sub


Viele Grüße
derHöpp
DerHoepp
Im Profil kannst Du frei den Rang ändern
 
Beiträge: 9723
Registriert: 14. Mai 2013, 11:08

Re: Prüfen ob Powerpoint geöffnet ist

Beitragvon MHed » 23. Jun 2021, 16:13

Hallo derHoepp,

ich bitte vielmals um Entschuldigung, das Thema ist leider bei mir untergegangen, ich hatte die Benachrichtigung versehentlich ausgeschaltet und bin kurz nach meinem Tread in Urlaub gefahren. :( Das tut mir sehr leid. Die Lösung kann ich dennoch verwenden und es wurde nicht für die Tonne gearbeitet.

Hoffe Du siehst es mir nach. :oops:
herzlichen Dank und beste Grüße :D
Martin


"Aufgeben ist das Letzte was man sich erlauben darf!"
MHed
Im Profil kannst Du frei den Rang ändern
 
Beiträge: 122
Registriert: 08. Okt 2015, 08:57


Zurück zu PowerPoint Forum (provisorisch)

Wer ist online?

Mitglieder in diesem Forum: 0 Mitglieder und 1 Gast