Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Message-Box überspringen

Forumthread: Message-Box überspringen

Message-Box überspringen
18.07.2004 19:51:33
Serge
Ich habe ein Makro geschrieben das andere Makros (Run) aufruft.
Diese anderen Runs enthalten aber Message-Box die ich beim Sammelmakro überspringen möchte.
Wie lautet die Anweisung?
Apllication.........! oder so
Danke Serge
Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Message-Box überspringen
18.07.2004 19:58:35
JensD
Hi
Mach es mit einer Hilfvariable.
Dim SammelVar As Boolean

Sub SammmelMakro()
SammelVar = True
Call Makro1
Call makro2
SammelVar = False
End Sub


Sub Makro1()
If SammelVar = False Then MsgBox "Hallo, Makro 1"
End Sub


Sub makro2()
If SammelVar = False Then MsgBox "Hallo, Makro 2"
End Sub

Gruß Jens
Anzeige
AW: Message-Box überspringen
18.07.2004 20:31:00
Matthias
Hallo Serge, hallo Jens,
alternativ ohne globale Variable, mit optionalem Argument:

Sub SammmelMakro()
Makro1 True
Makro2 True
End Sub


Sub Makro1(Optional NoMsg As Boolean)
If IsMissing(NoMsg) Then NoMsg = False
If Not NoMsg Then MsgBox "Hallo, Makro 1"
End Sub


Sub Makro2(Optional NoMsg As Boolean)
If IsMissing(NoMsg) Then NoMsg = False
If Not NoMsg Then MsgBox "Hallo, Makro 2"
End Sub

Gruß Matthias
Anzeige
AW: Message-Box überspringen
18.07.2004 21:33:29
JensD
Auch eine Lösung, geht noch ein stück kürzer

Sub Makro1(Optional NoMsg As Boolean)
If IsMissing(NoMsg) Then MsgBox "Hallo, Makro 1"
End Sub

Gruß Jens
AW: Message-Box überspringen
18.07.2004 20:00:20
Josef
Hallo Serge!
Eine MessageBox lässt sich nicht überspringen!
Gruß Sepp
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige