Frage von Zetesafe, 22

[Visual Basic] Sub der bei Änderung ausgeführt wird?

Hallo,

Ich möchte dass wenn man auf dem Arbeitsblatt einen bestimmten Wert in eine Zelle eingibt ein anderes Feld einen Text ausgibt. Das ist an sich kein Problem nur weiß ich nicht wo ich den Code reinschreiben soll. Kennt jemand eine Funktion mit der man ständig abfragen kann ob sich etwas verändert hat ohne einen Knopf zu drücken oder so?

Danke an alle die sich Gedanken machen

Antwort
von Britzcontrol, 22

Hier mal ein Gedankenanstoss.
... VBA-Monitor, angewählte Zelle feststellen, Zelle mit Wert belegen, ...
Reicht das so zum Weiterentwickeln ?

Gruß aus Berlin

Kommentar von Zetesafe ,

Das ist sehr gut damit kann ich es umsetzen. Danke dir und Gruß zurück aus Mainz.

Kommentar von Oubyi ,

Wichtig dabei ist noch, dass dieses Ereignis-Makro in das Modul des Tabellenblattes gehört!:
Rechtsklick auf den Tabellenreiter (unten, da wo z.B. Tabelle1 steht) und dann auf "Code anzeigen...".
P.S.: Das Prüfen auf die richtige Zelle machen viele eher über die Intersect-Funktion:
If Not Intersect(Target, Range("A1")) Is Nothing Then
....
End If

,aber SO sollte es auch klappen.

Expertenantwort
von Suboptimierer, Community-Experte für Excel, 11

VBA ist hier mit Kanonen auf Spatzen geschossen. Excelgrundfunktionalitäten reichen aus:

=WENN(<Zelle>=<Wert>;"Text";"")

Willst du unbedingt VBA nutzen, dann:

Private Sub Worksheet_Change(ByVal Target As Range)
 If Target.Address = "$A$1" Then
  If Target.Value = 1 Then Range("A2").Value = 2
 End If
End Sub

Keine passende Antwort gefunden?

Fragen Sie die Community