MSGBOX mit Symbol, wie ?
18.05.2017 16:23:13
Kurt
wie kann ich eine MSGBOX mit Symbol darstellen ?
Hier mein Muster:
Dim Antwort As String
Antwort = MsgBox("Was möchten Sie ausführen ?" & Chr(13) & Chr(13) & _
"Speicher-Änderungsmenü aktivieren oder " & Chr(13) & Chr(13) & _
"nur Datei speichern ? " & Chr(13) & Chr(13) & _
Chr(13) & Chr(13) & Chr(13) & _
"Speichern + Schließen : JA drücken", vbYesNoCancel, " Menü oder Beenden ?")
If Antwort = vbYes Then
MsgBox "speichern ..."
ElseIf Antwort = vbNo Then
MsgBox "Speicher-Änderungsmenü wird aktiviert !"
Else
MsgBox "abgebrochen !"
Exit Sub
mfg kurt k