Negativer Zellinhalt

Forumthread: Negativer Zellinhalt
3 Beiträge zu diesem Forumthread
Anzeige

Forumthread: Negativer Zellinhalt

13.12.2024 12:40:39

Micha

Hallo und guten Tag,

ich möchte, wenn im Zellbereich G7:G532 "Storno" steht im Zellbereich F7:F532
mein eingetragener Wert berechnet und als -Wert ausgegeben wird.
Also Eingabe: 20 / Ausgabe -20
In "Range" funktioniert es, jedoch in "Long" bekomme ich es nicht hin.
Kann mir jemand den richtigen Code mitteilen?
Dank bereits im Voraus

https://www.herber.de/bbs/user/174344.xlsm

3
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Negativer Zellinhalt

13.12.2024 12:47:18

daniel
AW: Negativer Zellinhalt

13.12.2024 12:48:33

Onur
AW: Negativer Zellinhalt

13.12.2024 14:16:36

Yal

AW: Negativer Zellinhalt

13.12.2024 12:47:18

daniel

Hi
ich würde das eher über eine zusätzliche Spalte machen.
also: =Wenn(F7="Storno";-G1;G7)
und dann mit dieser Spalte rechnen

Gruß Daniel

AW: Negativer Zellinhalt

13.12.2024 12:48:33

Onur

"In "Range" funktioniert es, jedoch in "Long" bekomme ich es nicht hin. " Range ? Long ?
Was soll das denn bitte heissen?
Und warum postest du ein leeres Blatt mit einem Code, der nicht viel mit dem beschriebenen Problem zu tun hat? Wo sind die Daten?

AW: Negativer Zellinhalt

13.12.2024 14:16:36

Yal

Hallo Micha,

es ist ja die Frage, ob die aktuelle letzte Zeile 532 immer so bleiben wird...

Deine Beschreibung ist, sicher aufgrund fehlender Satzzeichen, nicht ganz eindeutig. Ich gehe mal davon aus, die Werte werden in Spalte F eingetragen und in Spalte G steht schon vorher "Storno" (oder eben nicht).

Private Sub Worksheet_Change(ByVal Target As Range)

    If Target.Count > 1 Then Exit Sub

    If Not IsNumeric(Target.Value) Then Exit Sub

    If Not Intersect(Target, Range("F7:F532")) Is Nothing Then

        Application.EnableEvents = False

        If LCase(Cells(Target.Row, "G").Value) = "storno" Then Target.Value = -Target.Value

        Application.EnableEvents = True

    End If

End Sub

VG
Yal

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