Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
552to556
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
552to556
552to556
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

MSG Box für bestimmten Wert

MSG Box für bestimmten Wert
21.01.2005 20:15:04
Jörgiboy
Hallo,
habe folgendes Problem:
In Spalte "K" eines Tabellenblatts kann irgendwann der Wert "y1" auftauchen. Dann soll bitte eine MSG Box mit Fehlermeldung "Bitte Wert korigieren aufgehen".
(Der Wert y1 soll aber stehen bleiben)
Danke im voraus für eine Lösung
Jörgiboy

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: MSG Box für bestimmten Wert
Ramses
Hallo
etwas unverständlich.
Entsteht "y1" aus einer Berechnung oder einer "Eingabe" ?
Kopiere den Code in das Klassenmodul deiner Tabelle wo das funktionieren soll
Rechte Maustaste auf Tabellenreiter
Code anzeigen
Dort reinkopieren
Option Explicit

Private Sub Worksheet_Calculate()
Dim i
For i = 1 To Cells(65536, 11).End(xlUp).Row
If Cells(i, 11) = "y1" Then
MsgBox (Cells(i, 11).Address & ": Wert korrigieren")
End If
Next i
End Sub

Dieser Code funktioniert NUR, wenn "y1" das Ergebnis einer Berechnung ist
Es funktioniert nicht, wenn in die Zelle "y1" eingegeben wird.
Gruss Rainer
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige