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

Forumthread: MsgBox Typ Nr. (Wert) über InputBox

MsgBox Typ Nr. (Wert) über InputBox
19.01.2019 09:42:32
Dieter(Drummer)
Guten Morgen VBA Spezialisten,
ich suche die Möglichkeit, durch Zahleingabe (Wert) in InputBox, die entsprechende MsgBox zu zeigen.
Z.B. Eingabe = 1, dann wird MsgBox mit Schaltfläche OK und Abbrechen gezeigt.
Ideal wäre auch, wenn noch eine Textangabe vor zeigen der MsgBox möglich wäre.
Mein jetziger Versuch der aber so nicht funktionert, Kompilierungsfehler = "Argument nicht _
optional und Markierung aus "MsgBox":

Sub TestMsgBox_Nr()
Dim myValue As Variant
myValue = InputBox("Wert für MsgBox Typ?", "Test", 64)
MsgBox.Value = myValue 'Hier soll dann die entsprechende MsgBox gezeigt werden
End Sub

Mit der Bitte um Hilfe,
grüßt Dieter(Drummer)
Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: MsgBox Typ Nr. (Wert) über InputBox
19.01.2019 09:52:39
Hajo_Zi
Hallo Dieter,
Sub TestMsgBox_Nr()
Dim myValue As Variant
myValue = InputBox("Wert für MsgBox Typ?", "Test", 64)
select Case MyValue
case 1
MsgBox 1
Emd Select.
Msgbox mit Schalter kennst Du Ja.

Beiträge von Werner, Luc, robert, J.O.Maximo und folgende lese ich nicht.
Die Beiträge werden auch ignoriert, es erfolgt keine Antwort.
Anzeige
und wieder mal....
19.01.2019 09:55:21
Werner
Hallo Hajo,
...Beiträge lesen würde weiterhelfen.
Gruß Werner
AW: MsgBox Typ Nr. (Wert) über InputBox
19.01.2019 09:53:02
Werner
Hallo Dieter,
Sub TestMsgBox_Nr()
Dim myValue As Variant, myText As String, meldung As Variant
myValue = InputBox("Wert für MsgBox Typ?", "Test", 64)
myText = InputBox("Text eingeben", "Text der Message Box")
meldung = MsgBox(myText, myValue, "Ein Test")
End Sub
Gruß Werner
Anzeige
AW: Danke Hajo und Werner ...
19.01.2019 10:02:57
Dieter(Drummer)
Hallo HaJo und Werner,
... danke für beide Varianten. Hajo, in deiner Variante fehlt mir die Textmöglichkeit, deshalb nehme ich den Code von Werner, der Wert und Texteingabe ermöglicht. Genau das was ich wollte und fünktioniert prima.
Danke für prompte Lösung.
Gruß, Dieter(Drummer)
Gerne u. Danke für die Rückmeldung. o.w.T.
19.01.2019 10:13:51
Werner
;

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
Anzeige

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