Herbers Excel/VBA-Archiv

Informationen und Beispiele zum Thema MsgBox
Screenshot zu MsgBox	MsgBox-Seite mit Beispielarbeitsmappe aufrufen

Informationen und Beispiele zum Thema Userform
Screenshot zu Userform	Userform-Seite mit Beispielarbeitsmappe aufrufen

Belegung Schaltfläche msgbox

• Belegung Schaltfläche msgbox von Lars vom 21.08.2008 14:10:31
• AW: Belegung Schaltfläche msgbox - von Ramses am 21.08.2008 14:12:42
  • AW: Belegung Schaltfläche msgbox - von Lars am 21.08.2008 14:17:30
• AW: Belegung Schaltfläche msgbox - von mpb am 21.08.2008 15:02:33

Betrifft: Belegung Schaltfläche msgbox von: Lars
Geschrieben am: 21.08.2008 14:10:31

Hallo,

kann ich bei einer msgbox die Schaltflächen auch selber benennen?
Ich würde gerne wissen, ob ein Wert ober- oder unterhalb eines Grenzwertes liegt und somit die Tasten "oberhalb" und "unterhalb" in der msgbox haben.

Lars

Betrifft: AW: Belegung Schaltfläche msgbox von: Ramses
Geschrieben am: 21.08.2008 14:12:42

Hallo

Nein, das ist nicht möglich.
Bastel dir stattdessen eine Userform mit einer Textbox wo du den Wert reinschreiben kannst.
Anschliessend kannst du zwei Commandbutton einfügen, deren Besschriftung du frei definieren kannst

Gruss Rainer

Betrifft: AW: Belegung Schaltfläche msgbox von: Lars
Geschrieben am: 21.08.2008 14:17:30

Hallo Rainer,

danke, aber leider habe ich mit Userform keinerlei Erfahrung.
Ich denke, ich werde mir einen Workaround suchen müssen.

Gruß
Lars

Betrifft: AW: Belegung Schaltfläche msgbox von: mpb
Geschrieben am: 21.08.2008 15:02:33

Hallo Lars,

Deiner Frage glaube ich entnehmen zu können, dass Du den Grenzwert im Dialog vorgibst. Dann könntest Du auf der MsgBox die Buttons "ja" und "nein" nutzen, z.B. so:

Sub Abfrage()
MsgBox "Liegt der Wert über 1000?", vbYesNo
End Sub

Sub Weiterverarbeitung()
x = MsgBox("Liegt der Wert über 1000?", vbYesNo)
If x = 6 Then
    MsgBox "größer 1000"
Else
    MsgBox "kleiner 1000"
End If
End Sub

Gruß
Martin

Beiträge aus den Excel-Beispielen zum Thema "Belegung Schaltfläche msgbox"