MsgBox-Funktion (Visual Basic for Applications) (2024)

Artikel
09/03/2023

Zeigt eine Meldung in einem Dialogfeld an, wartet darauf, dass der Benutzer auf eine Schaltfläche klickt, und gibt eine ganze Zahl zurück, die angibt, auf welche Schaltfläche der Benutzer geklickt hat.

Hinweis

Syntax

MsgBox (prompt, [ buttons, ] [ title, ] [ helpfile, context ])

Die Syntax der MsgBox-Funktion verwendet die folgenden benannten Argumente:

Teil	Beschreibung
prompt	Erforderlich. Ein Zeichenfolgenausdruck, der als Meldung im Dialogfeld angezeigt wird. Die maximale Länge der Aufforderung beträgt etwa 1.024 Zeichen, je nach Breite der verwendeten Zeichen. Wenn die Aufforderung aus mehr als eine Textzeile besteht, können Sie die Zeilen mit einem Wagenrücklaufzeichen (Chr(13)), einem Zeilenvorschubzeichen (Chr(10)) oder einer Zeichenkombination aus Zeilenumbruch und Zeilenvorschubzeichen (Chr(13) und (Chr(10)) zwischen jeder Zeile trennen.
buttons	Optional. Ein numerischer Ausdruck, der die Kombination der Werte darstellt, die die Anzahl und den Typ der angezeigten Schaltflächen, der verwendeten Symbolart, der Identität der Standardschaltfläche sowie der Modalität des Meldungsfelds angeben. Wenn nicht angegeben, ist der Standardwert für Schaltflächen 0.
title	Optional. Ein Zeichenfolgenausdruck, der in der Titelleiste des Dialogfelds angezeigt wird. Wenn Sie Titel weglassen, wird der Anwendungsname in der Titelleiste platziert.
helpfile	Optional. Ein Zeichenfolgenausdruck, der die Hilfedatei mit der kontextbezogenen Hilfe für das Dialogfeld angibt. Wenn Sie helpfile angeben, müssen Sie auch context angeben.
context	Optional. Ein numerischer Ausdruck mit der Hilfekontextnummer, die der Autor der Hilfe für das entsprechende Hilfethema vergeben hat. Wenn Sie context angeben, müssen Sie auch helpfile angeben.

Einstellungen

Die Einstellungendes Buttons-Arguments sind:

Konstante	Wert	Beschreibung
vbOKOnly	0	Nur Schaltfläche OK anzeigen.
vbOKCancel	1	Nur die Schaltflächen OK und Abbrechen anzeigen.
vbAbortRetryIgnore	2	Die Schaltflächen Beenden, Wiederholen und Ignorieren anzeigen.
vbYesNoCancel	3	Die Schaltflächen Ja, Nein und Abbrechen anzeigen.
vbYesNo	4	Die Schaltflächen Ja und Nein anzeigen.
vbRetryCancel	5	Die Schaltflächen Wiederholen und Abbrechen anzeigen.
vbCritical	16	Das Symbol Kritische Meldung anzeigen.
vbQuestion	32	Das Symbol Warnungsabfrage anzeigen.
vbExclamation	48	Das Symbol Warnungsmeldung anzeigen.
vbInformation	64	Das Symbol Informationsmeldung anzeigen.
vbDefaultButton1	0	Die erste Schaltfläche ist Standard.
vbDefaultButton2	256	Die zweite Schaltfläche ist Standard.
vbDefaultButton3	512	Die dritte Schaltfläche ist Standard.
vbDefaultButton4	768	Die vierte Schaltfläche ist Standard.
vbApplicationModal	0	An die Anwendung gebunden. Der Benutzer muss auf das Meldungsfeld reagieren, bevor er seine Arbeit mit der aktuellen Anwendung fortsetzen kann.
vbSystemModal	4096	An das System gebunden. Alle Anwendungen werden unterbrochen, bis der Benutzer auf das Meldungsfeld reagiert.
vbMsgBoxHelpButton	16384	Fügt dem Meldungsfeld die Schaltfläche Hilfe hinzu.
vbMsgBoxSetForeground	65536	Legt das Meldungsfeld als Vordergrundfenster fest.
vbMsgBoxRight	524288	Der Text ist rechts ausgerichtet.
vbMsgBoxRtlReading	1048576	Gibt an, dass der Text auf hebräischen und arabischen Systemen von rechts links angezeigt werden soll.

Die erste Gruppe von Werten (0-5) beschreibt die Anzahl und den Typ der im Dialogfeld angezeigten Schaltflächen; die zweite Gruppe (16, 32, 48, 64) beschreibt die Symbolart; die dritte Gruppe (0, 256, 512) legt fest, welche Schaltfläche die Standardschaltfläche ist; und die vierte Gruppe (0, 4096) legt die Modalität des Meldungsfelds fest. Verwenden Sie beim Kombinieren von Zahlen zum Erstellen eines endgültigen Werts für das Schaltflächen-Argument nur eine Zahl aus jeder Gruppe.

Hinweis

Diese Konstanten werden von Visual Basic for Applications in der VbMsgBoxStyle-Enumeration angegeben. Daher können die Namen an einer beliebigen Stelle im Code anstelle der tatsächlichen Werte verwendet werden.

Rückgabewerte

Die Rückgabewerte werden in der VbMsgBoxResult-Enumeration definiert.

Konstante	Wert	Beschreibung
vbOK	1	OK
vbCancel	2	Cancel
vbAbort	3	Abbruch
vbRetry	4	Wiederholen
vbIgnore	5	Ignore
vbYes	6	Ja
vbNo	7	Nein

Hinweise

Wenn sowohl helpfile als auch context angegeben werden, kann der Benutzer F1 (Windows) oder HILFE (Macintosh) drücken, um das Hilfethema anzuzeigen, das context entspricht. Einige Hostanwendungen, z. B. Microsoft Excel, fügen ebenfalls automatisch eine Hilfe-Schaltfläche zum Dialogfeld hinzu.

Wenn im Dialogfeld eine Abbrechen-Schaltfläche angezeigt wird, hat das Drücken der ESC-Taste dieselbe Wirkung wie das Klicken auf Abbrechen. Wenn das Dialogfeld eine Hilfe-Schaltfläche enthält, wird die kontextbezogene Hilfe für das Dialogfeld bereitgestellt. Es wird jedoch erst ein Wert zurückgegeben, nachdem auf eine der anderen Schaltflächen geklickt wurde.

Hinweis

Wenn Sie mehr als das erste genannte Argument angeben möchten, verwenden Sie MsgBox in einem Ausdruck. Um Positionsargumente auszuschließen, müssen Sie das entsprechende Kommatrennzeichen hinzufügen.

Beispiel

In diesem Beispiel wird die MsgBox-Funktion verwendet, um eine Kritischer Fehler-Nachricht in einem Dialogfeld mit den Schaltflächen Ja und Nein anzuzeigen. Die Schaltfläche Nein ist als Standardantwort angegeben. Welcher Wert von der MsgBox-Funktion zurückgegeben wird, ist abhängig von der Schaltfläche, die der Benutzer ausgewählt hat. In diesem Beispiel wird vorausgesetzt, dass DEMO.HLP eine Hilfedatei ist, die ein Thema mit einer Hilfekontextnummer enthält, die 1000 entspricht.

Dim Msg, Style, Title, Help, Ctxt, Response, MyStringMsg = "Do you want to continue ?" ' Define message.Style = vbYesNo Or vbCritical Or vbDefaultButton2 ' Define buttons.Title = "MsgBox Demonstration" ' Define title.Help = "DEMO.HLP" ' Define Help file.Ctxt = 1000 ' Define topic context. ' Display message.Response = MsgBox(Msg, Style, Title, Help, Ctxt)If Response = vbYes Then ' User chose Yes. MyString = "Yes" ' Perform some action.Else ' User chose No. MyString = "No" ' Perform some action.End If

Siehe auch

Funktionen (Visual Basic for Applications)

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.