Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.09.2025 22:18:24
Liste mit Links - tricky
26.09.2025 18:34:36
Welches Datum gibt mein M-Code aus?
26.09.2025 10:29:46
Wert aus einer Zelle bei jeder Eingabe in neue Zelle
26.09.2025 08:51:00
Teilinhalt einer Zelle vergleichen
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1648to1652
1648to1652
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Wenn sich Spalte A ändert

Forumthread: Wenn sich Spalte A ändert

Wenn sich Spalte A ändert
03.10.2018 21:38:33
pika
Hallo,
Wenn sich spalte A ändert soll in Spalte B das Wort Rot stehen,
Wie kann ich das mit VBA realisieren ?
LG
Anzeige

9
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Wenn sich Spalte A ändert
03.10.2018 22:18:56
Daniel
HI
kann man sicherlich mit VBA realisieren.
nur solltest du genauer beschreiben, was da passieren soll und vorallem wie die Werte in Spalte A zustande kommen und sich ändern.
Sind das fixe Werte die von Hand geändert werden oder sind das Formeln, die nach einer neuberechnung neue Werte bekommen.
das einfachste ist, du kopierst die aktuelle Spalte A und fügst sie nach C (oder eine andere freie Spalte) als Wert ein.
dann kommt in Spalte B die Formel =Wenn(A1=C1;"";"rot")

Gruß Daniel
Anzeige
Es kann sich nur um Werte handeln, sonst unsinnig
04.10.2018 04:21:56
lupo1 

Private Sub Worksheet_Change(ByVal T As Range)
If T.Column = 1 Then Cells(T.Row, 2) = "Rot"
End Sub

AW: Es kann sich nur um Werte handeln, sonst unsinnig
04.10.2018 05:19:08
Gerd
Moin,
warten wir auf die "Sonderwünsche".
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Columns(1)) Is Nothing Then
Intersect(Target, Columns(1)).Offset(, 1) = "Rot"
End If
End Sub

Gruß Gerd
Anzeige
Warum sollte man keine Formeln auf eine ...
04.10.2018 09:09:13
Daniel
... Änderung des Ergebnisses hin überwachen wollen?
Ich finde das überhaupt nicht unsinnig.
Gruß Daniel
Dann überlege Dir doch die Konsequenzen ...
04.10.2018 10:23:20
lupo1
... bei automatischer Neuberechnung hast Du ja gar keine Chance, Rot zu verhindern.
Außerdem fehlt dazu das Ereignis. Somit müsste A irgendwo gespiegelt sein ... und spätestens dort wären es Werte.
Anzeige
AW: Dann überlege Dir doch die Konsequenzen ...
05.10.2018 09:00:01
Daniel
Richtig, ich kopiere die aktuellen Werte der Spalte A und kann damit per einfacher Formel überwachen, ob sich die Ergebnisse der Formeln in Spalte A geändert haben. (Siehe hierzu auch meinen ersten Beitrag)
Hätte auch für die Überwachung von Fixwerten den Vorteil, das nur echte Wertänderungen angezeigt werden, und nicht, wenn der Anwender zwar in die Zelle klickt, aber den gleichen Wert nochmal eingibt.
Gruß Daniel
Anzeige
Wenn Du das brauchst ... ich jedenfalls
05.10.2018 09:31:08
lupo1
mag das Zwischenspeichern einer ganzen Spalte nicht so (bzw. nur in begründeten Fällen).
AW: Es kann sich nur um Werte handeln, sonst unsinnig
04.10.2018 20:03:40
pika
Danke, funktioniert 1A.
PS: Ich komme mit der Aufbau des Forums überhaupt nicht zurecht.
AW: Wenn sich Spalte A ändert
04.10.2018 16:01:19
Ludwig
Moin, ja das ist möglich:
https://www.herber.de/bbs/user/124411.xlsm
Probier es mal und ich freue mich über Feedback.
Anzeige
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige