Herbers Excel-Forum - das Archiv

Alert erstellen mit Funktionen Ja/Nein und auslese

Bild

Betrifft: Alert erstellen mit Funktionen Ja/Nein und auslese
von: soendi
Geschrieben am: 27.10.2003 11:14:17
Ich möchte ein Alert-Fenster beim Aufruf eines Makros.
Das Makro checkt, ob in einer bestimmten Zelle ein bestimmter Wert steht und falls nicht, soll das der Alert erscheinen. Es soll dann die Antwort des Benutzers (Ja/Nein) auslesen und je nach dem zu einer anderen Sprungmarke gehen.

Danke für die Hilfe!
soendi

Bild

Betrifft: AW: Alert erstellen mit Funktionen Ja/Nein und aus
von: georg wurm
Geschrieben am: 27.10.2003 11:34:28


Sub div_alarme()
'worksheet, wo abgefragt werden soll anwählen
Sheets("daten").Select
'zelle zum abfragen aussuchen (geht auch anders
Range("a1").Select
'abfragen
If ActiveCell = 1 Then
wert = MsgBox("Dieser Wert wurde gefunden: " & ActiveCell & "Was nun tun? Weitermachen mit 'OK' Aufhören mit 'Abbrechen", vbOKCancel, "Frage")
End If
'und dann kann man mit dem rückgabewert [wert] machen, was man will!
End Sub


Bild

Betrifft: AW: Alert erstellen mit Funktionen Ja/Nein und auslese
von: ANdreas
Geschrieben am: 27.10.2003 11:37:53
Hallo soendi,

hier mein Vorschlag:



Sub AlertMakro()
If Range("C10").Value = "Hallo" Then _
If MsgBox("Ja oder nein?", vbYesNo + vbQuestion, _
"Frage") = vbYes Then Range("A1").Select
End Sub



Bei Makroaufruf wird geprüft ob in Zelle C10 "Hallo" steht. Ist das der Fall und wird die anschließende MsgBox mit Ja bestätigt, wird in Zelle A1 gesprungen.
Hoffe das hilft weiter,
Andreas
Bild

Betrifft: AW: Alert erstellen mit Funktionen Ja/Nein und auslese
von: soendi
Geschrieben am: 27.10.2003 12:02:54
danke! hat wunderbar geklappt..!
 Bild
Excel-Beispiele zum Thema " Alert erstellen mit Funktionen Ja/Nein und auslese"
Bei falscher Eingabe alten Wert wiederherstellen Automatisch Sicherungsdatei erstellen
Eigene Menüleiste mit Untermenüs erstellen Arbeitsmappen-History erstellen
Per VBA einen Verweis zu einer *.DLL erstellen Startansicht wiederherstellen
Aus AddIn neue Arbeitsmappe mit Code erstellen Benutzerdefinierte Funktion durch Code erstellen und löschen
Faxbestellung auf Grundlage einer Artikelliste erstellen Seitenumbruch ermitteln und Übertrag erstellen