Live-Forum - Die aktuellen Beiträge
Datum
Titel
20.04.2024 00:49:19
Excel Sheet in einen Excel Kalender einfügen
20.04.2024 00:08:11
In Ordner nur das Speichern von Dateien erlauben
19.04.2024 21:26:15
mehrfache Texte finden
19.04.2024 19:41:34
Bei VBA Ausführung Anzeige einfrieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
784to788
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
784to788
784to788
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

VbYes

VbYes
02.08.2006 14:31:56
Darren
Hi,
ich habe so eine MessageBox gebastelt:
MsgBox "Die Spalten betragen:" & xtest, vbYesNo
Wie kann ich die Buttons steuern, wenn vbYes und vbNo ?
Ich hatte es mit diesem Code versucht habe es geht nciht.
If vbNo Then
GoTo acabou
End If
Grüße
Darren

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: VbYes
02.08.2006 14:37:18
Peter
Hallo Darren,
sieh dir das ,al an:

Sub Loeschabfrage()
If MsgBox("Wollen Sie den Auftrag wirklich löschen.", _
vbYesNo + vbQuestion, "    Löschabfrage, nur zur Sicherheit.") = vbYes Then
MsgBox "Ja wurde angeklickt." & Chr(10) & Chr(10) & _
"Nun geht der Auftrag verloren...", _
64, "    Hinweis für " & Application.UserName
Else
MsgBox "Nein wurde angeklickt." & Chr(10) & Chr(10) & _
"Gerade noch einmal Glück gehabt...", _
64, "    Hinweis für " & Application.UserName
End If
End Sub

Viele Grüße Peter
Eine kurze Nachricht, ob es läuft, wäre nett - danke.
Anzeige
AW: VbYes
02.08.2006 14:38:47
Jan3
Hi,
Hast Du schon mal in der Hilfe nachgesehen.
MsgBox-Funktion (Beispiel)
In diesem Beispiel wird die MsgBox-Funktion verwendet, um eine Meldung zu einem schwerwiegenden Fehler in einem Dialogfeld mit den Schaltflächen Ja und Nein anzuzeigen. Nein ist dabei die Voreinstellung. Der von MsgBox gelieferte Wert hängt von der Schaltfläche ab, die der Benutzer wählt. Im Rahmen dieses Beispiels wird angenommen, daß DEMO.HLP eine Hilfedatei ist, in der ein Thema mit der Kontextnummer 1000 vorhanden ist.
Dim Mldg, Stil, Titel, Hilfe, Ktxt, Antwort, Text1
Mldg = "Möchten Sie fortfahren ?" ' Meldung definieren.
Stil = vbYesNo + vbCritical + vbDefaultButton2 ' Schaltflächen
' definieren.
Titel = "MsgBox-Demonstration" ' Titel definieren.
Hilfe = "DEMO.HLP" ' Hilfedatei
' definieren.
Ktxt = 1000 ' Kontext für Thema
' definieren.
Antwort = MsgBox(Mldg, Stil, Titel, Hilfe, Ktxt) ' Meldung anzeigen.
If Antwort = vbYes Then ' Benutzer hat "Ja"
' gewählt.
Text1 = "Ja" ' Operation ausführen.
Else ' Benutzer hat "Nein"
' gewählt.
Text1 = "Nein" ' Operation ausführen.
End If
Jan
Anzeige
AW: VbYes
02.08.2006 14:55:32
Darren
Hallo Ihr beiden,
danke sehr! Ich habe das Problem somit lösen können!
Grüße
Darren

Links zu Excel-Dialogen

MessageBox

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige