Office: Messagebox in den Vordergrund

LtLTSmash · 20. August 2019

Hallo,
Ich habe ein kleineres Problem, evtl kennt ja jemand ne gute Lösung.
Ich habe eine Excel Datei in der Diagramme via Makro erzeugt werden und diese in eine PowerPoint verschoben werden. Das klappt alles super.
Da am Ende in der PowerPoint noch von Hand weitere Änderungen gemacht werden müssen soll am ende die PowerPoint aktiv sein. Auch das klappt. Nun möchte ich aber noch eine Messagebox am Ende platzieren die den Nutzer darauf hinweisen soll, das speichern nicht zu vergessen. Nur leider bleibt diese Messagebox im Hintergrund, so das ich erst mal von Hand Excel aktivieren muss um die Messagebox bestätigen zu können.
Mein Bisheriger Lösungsansatz erst mal das Workbook aktiv zu setzen, (WB.Activate) oder der versuch das in der Messagebox zu hinterlegen (MsgBox GetMessage(35), vbSystemModal) schlugen fehl. Ich denke die Meldung ist wichtig, aber der jetzige Zustand ist noch unbefriedigend.

Besten Dank im Voraus
Gruß
Thorsten

:)

Storax · 22. August 2019

Mit folgendem Code kann man Excel in den Vordergrund bringen, auper es war vorher minimiert
Code:

Option Explicit

Private Declare Function SetForegroundWindow Lib "user32" _
(ByVal hWnd As Long) As Long
Sub Test()

Dim hWnd As Long
hWnd = Application.hWnd

SetForegroundWindow hWnd
MsgBox "Test"

End Sub
Klicke in dieses Feld, um es in vollständiger Größe anzuzeigen.

LtLTSmash · 23. August 2019

Das klappt super! Vielen Dank!

Office: Messagebox in den Vordergrund

Messagebox in den Vordergrund

Messagebox in den Vordergrund

Messagebox in den Vordergrund - Similar Threads - Messagebox Vordergrund

MessageBox erstellen

Excel-Datei ohne Speichern schließen und mit MessageBox

Messagebox-Abfrage & aufgrund der Auswahl eine Aktion ausführen

Den Inhalt mehrere Zellen und Tabellenblätter in einer MessageBox anzeigen

Pflichtfelder bei Klick auf Speichern per Messagebox anzeigen?????

MessageBox-Makroaktion

Messagebox bei Abrageresultat mit leeren Datensätzen