Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Anzeige
Inhaltsverzeichnis

Ergebniskontrolle über WENN-DANN

Forumthread: Ergebniskontrolle über WENN-DANN

Ergebniskontrolle über WENN-DANN
15.01.2003 10:14:44
Kerstin
Hallo,

folgendes Problemchen:
Hab in einer Zelle eine simple Summenformel und möchte nun, immer wenn das Ergebnis negativ werden sollte, eine Fehlermeldung anzeigen lassen und den Zelleninhalt löschen.

Wie geht das?

Danke schon mal, Kerstin!

Anzeige

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

Betreff
Datum
Anwender
Anzeige
Re: Ergebniskontrolle über WENN-DANN
15.01.2003 10:40:55
Steffan
Hallo Kertsin,

kopiere folgendes Makro in den Codebereich Deines Tabellenblattes:

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
Dim oCell As Range
Set oCell = Range("A1")
If Target.Address = oCell.Address Then
If (IsNumeric(Target.Value) = True And Target.Value < 0) Then _
MsgBox "Negative Werte " & Target.Address & " nicht zulässig", vbOKOnly: Target.ClearContents
End If
End Sub

Die Zelladresse musst in der Zeile 'Set oCell=..." noch anpassen.
Damit wird allerdings dann auch Deine Summenformel gelöscht.


Steffan.

Anzeige
Re: Ergebniskontrolle über WENN-DANN
15.01.2003 11:11:38
Knud
Hi Kerstin,
Das geht auch über die Gültigkeit (Daten -> Gültigkeit -> Benutzerdefiniert):
Re: Ergebniskontrolle über WENN-DANN
15.01.2003 11:16:25
Knud
=D1>=0 muss das natürlich heißen... sorry

Forumthreads zu verwandten Themen

Anzeige
Anzeige