Hallo Liebe Community,
ich habe ein kleines Problem und brauche Hilfe.
Ich möchte überprüfen, ob das Word-Dokument, auf welchem das Macro läuft, minimiert ist. Wenn minimiert, soll eine Ausgabe stadtfinden. Die Ausgabe funktioniert, die Abfrage noch nicht.
Mein Code sieht so aus:
Sub popUp()
SetForegroundWindow (FindWindow("OpusApp", vbNullString))
If ActiveDocument.ActiveWindow.WindowState = wdWindowStateMinimized Then
MsgBox "Vergessen Sie bitte nicht die Arbeitsmappe zu schließen!", vbSystemModal
End If
End Sub
ActiveDocument sollte doch eigentlich schon dieses Dokument ansprechen.. Beim Kompilieren bekomme ich den Fehler: Variable nicht gefunden.
Gefunden habe ich dazu: https://docs.microsoft.com/de-de/office/vba/api/word.window.windowstate
Darin steht, dass eine Variable notwendig ist, welche ein Window Objekt darstellt.
Wie kann ich diese Variable erstellen, ohne einen genauen Datei-Namen zu haben?
Hoffe ihr könnt mir helfen! Zu Word gibt es doch noch deutlich weniger als zu Excel..
|