Supportnet Computer
Planet of Tech

Supportnet / Forum / Tabellenkalkulation

Makro erst nach Abfrage starten





Frage

Hallo, ich suche nach einer Möglichkeit, mit dem Makro "auto_open" eine Abfrage zu erstellen mit den Buttons [i]Weiter[/i] (Ok) und [i]Beenden[/i]. Bei [i]Weiter[/i] soll das Makro [i]Auswerung()[/i] im gleichen Modul gestartet werden, bei [i]Beenden[/i] soll Excel beendet werden. Kann mir jemand unter die Arme greifen? Vielen Dank Thomas

Antwort 1 von Guenter

Hallo Thomas,

ich schlage mal vor, das folgende Makro zu testen:

Option Explicit

Sub auto_open()
Dim Ereignis
Ereignis = MsgBox("Wollen Sie das Makro ausführen?", vbYesNo + vbQuestion)
If Ereignis = vbYes Then
  Call makro1
Else
Application.Quit
End If
End Sub

Sub makro1()
MsgBox ("Test")

End Sub


Gruß
Günter

Antwort 2 von JonesM

Dat wars, vielen Dank!

Grüße Thomas