Guten Tag,
Ich bin durch einen Zufall auf ein fehlendes Element in der Klasse "VbMsgBoxResult" gestoßen.
Es handelt sich um das nicht definierte Element vbHelp. Ich benötige dieses Element um eine einfache
MsgBox zu schreiben. Die Ausgabe wird durch das fehlende Element angegeben.
Beispiel:
Sub Workbook_Open()
If MsgBox("Test", vbMsgBoxHelpButton) = vbHelp Then
MsgBox "Test", vbCritical, "Test"
Else
MsgBox "Gut gemacht", vbAbortRetryIgnore, "Test"
End If
End Sub
Der Button "Help" kann hierbei nicht genutzt werden für eine weitere Ausführung.
Das Problem könnte man eventuell Lösen, indem man einen eigenen Button definiert.
Gäbe es eine einfachere Lösung, wenn ja, welche?
|