ganz easy
wie war das nochmal
bevor makro1 läuft soll gefragt
ja/nein
bei ja, soll makro1 laufen
nei nein, soll makro1 nicht laufen
dank und gruss
bevor makro1 läuft soll gefragt
ja/nein
bei ja, soll makro1 laufen
nei nein, soll makro1 nicht laufen
dank und gruss
Nachricht = "Soll Makro ausgeführt werden?"
Stil = vbYesNo
Titel = "Makro ausführen?"
Antwort = MsgBox(Nachricht, Stil, Titel)
If Antwort = vbYes Then
'hier Makro einfügen
MsgBox ("Makro wird ausgeführt")
Else
MsgBox ("Makro wird nicht ausgeführt")
Exit Sub
End If
Gruss
Chris
Sub WennDannSonst()
If Antwort = vbYes Then
mak1
Else
MsgBox ("Makro wird nicht ausgeführt")
Exit Sub
End If
End Sub
Public Sub mak1()
MsgBox ("Makro wird ausgeführt")
End Sub
dank und gruss
If Antwort = vbYes Then
Call mak1
Else
MsgBox ("Makro wird nicht ausgeführt")
Exit Sub
End If
End Sub
Makro im Modul:
Sub mak1()
MsgBox "Makro wird ausgeführt."
End Sub
Gruss
Chris
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen