Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 18:41:19
vba Zeilen duplizieren ab aktiver Zeile bis letzte Zeile
25.04.2024 18:22:55
Zeilen mit bestimmtem Datum in andere Mappe übertragen
25.04.2024 18:14:45
VBA - Excell - Kopie und "Diebstahl" Schützen
25.04.2024 17:49:39
Bedingte Formatierung
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1720to1724
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
1720to1724
1720to1724
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Msgbox wenn Zahl über 100

Msgbox wenn Zahl über 100
14.11.2019 09:27:12
schlu
Hallo zusammen,
kennt ihr einen einfachen Code, damit bei Eingabe einer Zahl größer als 100 in einer Zelle in einem Excel Blatt eine Messagebox kommt?
Ich habe 5 Zellen, die unterschiedliche Bedingungen haben bzw. Zahlengrenzen.
Danke!

15
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Msgbox wenn Zahl über 100
14.11.2019 09:29:25
Bernd
Hi,
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Range("A1") > 100 Then
MsgBox ("Wert überschritten")
Exit Sub
End If
End Sub
MfG Bernd
AW: Msgbox wenn Zahl über 100
14.11.2019 11:53:23
schlu
Super! Danke Bernd!
Ich will explizit VBA machen, weil ich möchte, dass die User die Nachricht mit Ja oder Nein bestätigen.
Mit vbyesno bekomme ich den Code iwie nicht hin. Kannst du mir noch sagen, wie ich hinter des Texts der Msgbox noch die Felder Ja und Nein bekomme (anklickbar).
DAnke!
AW: Msgbox wenn Zahl über 100
14.11.2019 12:10:05
Klaus 

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Range("A1") > 100 Then
If MsgBox("Wert überschritten, trotzdem eintragen?", vbYesNo) = 6 Then
'tue nichts - Wert ist und bleibt eingetragen
Else
'Wert nicht eintragen
Application.EnableEvents = False
Application.Undo
Application.EnableEvents = True
End If
End If
End Sub
LG,
Klaus M.
Anzeige
ohne VBA
14.11.2019 12:16:16
Klaus
Schau mal da:
https://www.herber.de/bbs/user/133215.xlsm
in A1 mit VBA und Message Box gelöst, wie gewünscht.
In B1 per Datenüberprüfung OHNE VBA gelöst - aber auch mit einer entsprechenden Fehlerbox und der expliziten ja/nein Frage!
Da man Makros abschalten kann, rate ich dir zur VBA freien Lösung.
LG,
Klaus
AW: ohne VBA
14.11.2019 16:22:35
schlu
Ah super! das ist ja cool. wie hast du denn das programmiert? also die zweite Variante...
zu der ersten variante: wenn ich da auf Nein klicke, bleibt die Zahl trotzdem in der Zelle...das sollte ja nicht so sein. Kann man das so machen, dass die Zelle wieder leer ist? (interessiert mich, auch wenn ich vermutlich die zweite lösungsvariante nehme)
Danke auf jedenfall! Und coole zweite Lösung.
Anzeige
AW: ohne VBA
14.11.2019 16:26:09
Klaus
Hi schlu,
die zweite Lösung findet sich in der "Datenüberprüfung". Ich hab hier nur Excel 2007, kann darum keinen Screenshot machen und muss dich auf morgen vertrösten wenn ich wieder im Büro bin.
LG,
Klaus
Trotz Daniels Beschreibung noch ein Rückfrage,
14.11.2019 17:04:25
Klaus
Schlu,
du hast explizit nach einer "Yes/No" Messagebox gefragt, aber meine Lösung mit der Meldung aber der Wert bleibt drin war nicht richtig.
Also - bei YES soll der Wert über 100 gelöscht werden. Was soll denn bei NO passieren, soll der Wert ebenfalls gelöscht werden? Dann hätte eine einfache "OK" Messagebox doch gereicht.
LG,
Klaus M.
AW: ohne VBA
14.11.2019 16:33:32
Daniel
Hi
markiere mal eine Zelle, für die du so ein Limit haben willst.
klicke dann DATEN - DATENTOLLS - DATENÜBERPRÜFNG - DATENÜBERPRÜFUNG
dann öffnet sich ein Assistent, bei dem du im Reiter "Einstellungen" angeben kannst, welche Werte zulässig sind und im Reiter "Fehlermeldung" den Text, der bei Falscheingabe angezeigt werden soll
im Reiter "Eingabemeldung" kannst du einen Text angeben, er als Bubblehelp angezeigt wird, wenn du die Zelle anklickst.
Gruß Daniel
Anzeige
Verhalten der Messagebox beeinflussen
14.11.2019 18:08:10
Daniel
Hi
noch ein Hinweis:
im Reiter "Fehlermeldung" kannst du den Meldungstyp auswählen: Stopp, Warnung, Hinweis
das beeinflusst nicht nur das Aussehen, sondern auch Optionen bei den Rückfragen.
bei Stopp ist es bspw nicht möglich, einen unzulässigen Wert einzugeben.
bei den anderen Optionen geht es nach Bestätigung.
Gruß Daniel
AW: Msgbox wenn Zahl über 100
14.11.2019 09:32:10
Klaus
Hi Schlu,
Hier im Forum bevorzugen wir echte Vornamen, wie darf ich dich ansprechen?
Die Lösung die Bernd gezeigt hat macht exakt was du willst. Allerdings würde ich etwas so banales lieber OHNE VBA lösen - nimm die bedingte Formatierung und färbe die Zelle rot ein, wenn der Wert über 100 liegt.
LG,
Klaus
Anzeige
Warum Msgbox? Besser Datenprüfung (Max)! owT
14.11.2019 10:58:28
EtoPHG

AW: Warum Msgbox? Besser Datenprüfung (Max)! owT
14.11.2019 22:47:17
Bernd
Hi,
was gibt es da nachzufragen warum Msgbox?
Der Fragesteller wollte das so!
MfG Berndì
Wohl aus Unwissen, seiner- und deinerseits (owT)
15.11.2019 07:50:33
EtoPHG

AW: Wohl aus Unwissen, seiner- und deinerseits (owT)
15.11.2019 07:57:29
Klaus
Hallo Berndi,
lies mal den oberen Thread ganz, der Fragesteller ist ganz begeistert von der Möglichkeit, das ganze VBA-Frei über die Datenüberprüfung zu machen! Dafür sind "wir" doch da, um Excel-Wissen und Tricks weiter zu geben.
Wenn ich in der Firma immer alles so machen würde wie meine Fragesteller es für richtig halten, würde ich immer noch mit Karteikarten arbeiten!
LG,
Klaus
AW: Wohl aus Unwissen, seiner- und deinerseits (owT)
15.11.2019 16:20:23
Bernd
Hi,
auf eine spezielle Frage wird es stets nur EINE ANTWORT geben, das ist nun mal so. Und nach anderen Möglichkeiten wurde nicht gefragt auch wenn es diese geben mag. Wichtig ist dann anscheinend von Euch, andere zu belehren.
Um es in HaJos Worten zu fassen, bin dann raus, Eure Intelligenz ist Ultra!
MfG Bernd
Anzeige

300 Forumthreads zu ähnlichen Themen

Wenn-Dann + SVERWEIS ???
B@sti

Hallo zusammen,
ich bräuchte zu folgendem Thema eure Hilfe:
und zwar geht es um den Abgleich zweier Arbeitmappen. In der ersten Arbeitsmappe befinden sich die Infos, aus der ein Ergebnis für die zweite Arbeitsmappe ausgelesen werden soll. Hab mal ne Beispieldatei angehängt:
https://...
21.08.2008 10:54:00
Thread-ID: 1003404
4 Beiträge
Anzeige
Wenn 1 dann Wert aus Überschrift
Kendra

Hallo,
ich habe folgendes Problem, zu dem mir einfach keine Lösung einfallen will:
Meine Matrix sieht in etwa so aus:
______Peter_Hans_Susi_Karl_Klaus
Auto___0____1____0___2___0
Haus___1____0____0___0___2
Urlaub__0____0____1___0___2
Hobby__2____0____0___1___0...
23.09.2008 14:03:57
Thread-ID: 1011726
7 Beiträge
Mehr als 7 Wenn-Dann-Verschachtelungen
Bernd

Hallo Leute,
ich habe eine WENN DANN Formel mit mehr als 7 Verschachtelungen. Hat jemand eine Idee wie ich diese Formel so umschreiben kann, dass ich Sie nutzen kann?
Hier ist sie:
=WENN(Monat($D$2)=1;SVERWEIS($D$2;'01'!$G$7:$R$43;2);WENN(Monat($D$2)=2;SVERWEIS($D$2;'02'!$G$7:$R$43...
13.10.2008 17:23:11
Thread-ID: 1016134
4 Beiträge
Anzeige
Textbox - wenn nicht mehr als 3 stellen dann
Patrick

Hallo,
ich habe auf einer Userform eine Textbox in welche je nach Auswahl Kürzel (z. B. BE) eingetragen werden. Es soll nun realisiert werden, dass wenn ich auf einen commandbutton drücke, geprüft wird ob in der besagten Textbox nach wie vor nur "BE" steht oder diese Textbox bearbeitet wurd...
12.11.2008 16:39:47
Thread-ID: 1023910
5 Beiträge
WENN-DANN verschachteln
Stefan

Guten Morgen Zusammen
Hab da ein kleines WENN-DANN Problem. Da müßte ich (wahrscheinlich) schachteln. Aber mit Formeln und verschachteln hab ich so meine lieben Probleme.
Problem:
Ich möchte eine Auswertung machen. Hierzu steht in Zelle E18 der Wert - z.B. A für Aussenstelle und H f...
21.11.2008 08:11:00
Thread-ID: 1026592
2 Beiträge
Wenn-Dann-Funktion als Makro
Sulley

Hallo zusammen,
ich hänge an einem Makro fest.
Matthias L und fcs (Vielen dank noch mal an dieser Stelle) haben mir mal jeder ein super makro gebaut, mit welchem ich Daten von einer Tabelle ans Ende einer anderen Tabelle schicken kann. Hat auch super geklappt.
Hier nochmal das Makro...
24.11.2008 16:47:36
Thread-ID: 1027372
11 Beiträge
Formelproblem "wenn(text - beinhaltet, dann....)
Andi

Hallo Experten,
Ich steh bei folgender Excelformel an.
=WENN(D13=....folgender text beinhaltet ist (AA).....;"True";"false")
Ich würde gerne überprüfen ob im Feld D13 der Text "AA" vorkommt (z.B. Artikel "AA01"), falls dies zutrifft bitte "True" schreiben, ansonsten "false".
Da...
04.12.2008 11:42:00
Thread-ID: 1030117
3 Beiträge
WENN - dann nicht
anke2245

Hallo Excelfreunde,
wieder einmal ein Problem mit der Erstellung und der Eingabe einer Formel:
Beispiel:
befindet sich in der Zelle B12 eine 1; darf in der Zelle D12 keine 1 eingegeben werden;
befindet sich in der Zelle B12 eine 2; darf in der Zelle D12 keine 2 eingegeben werden...
12.12.2008 15:27:31
Thread-ID: 1032433
5 Beiträge
Anzeige

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
Archiv - Verwandte Themen
Forumthread
Beiträge
3
5
6
3
6
4
1
10
2
4
10
1
7
14
1
3
2
5
4
11
2
5
2
2
11