Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 08:41:49
VBA: Probleme mit pdftk zum Zusammenfügen
25.04.2024 00:42:03
Listbox mit gefilterten Daten füllen
24.04.2024 20:38:58
Summe mit Bedingung, nur letzte Ergebnisse anzeigen
24.04.2024 19:29:30
Formel filter
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
444to448
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
444to448
444to448
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Worksheet_Change

Worksheet_Change
28.06.2004 11:18:22
zaske
Hallo ihr vielen Helfer,
ich möchte per "Worksheet_Change" Daten in ein weiteres
Tabellenblatt übertragen.
Ich weiß aber nicht, welche Zelle ich auslesen muss.
Also nicht ActiveCell oder Ähnliches.
Ich brauche wert="geänderte Zelle" und welche Zelle geändert wurde.
In der Recherche habe ich leider nichts gefunden.
Wer kann helfen?
Gruß
Frank

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Worksheet_Change
sergiesam
Hi,
hierfür wird die Target-Variable (Range-Objekt) mitgeliefert.

Private Sub Worksheet_Change(ByVal Target As Range)
MsgBox Target.Address
End Sub

Sam
AW: Worksheet_Change
28.06.2004 11:32:12
zaske
Hallo Sam,
danke für die schnelle Antwort.
Ich komme mit dieser Variable nicht so ganz klar.
Beispiel:
In A1 in Tabelle1 schreibe ich den wert "10".
Jetzt soll in Tabelle2 in B1 der wert "10" geschrieben werden.
Kannst Du weiterhelfen?
Gruß
Frank
AW: Worksheet_Change
sergiesam
Hi,
hier ein Beispiel:

Private Sub Worksheet_Change(ByVal Target As Range)
'Wenn in der Spalte A etwas eingetragen wird, wird es in Tabelle2 in der Spalte B übertragen
If Target.Column = 1 Then 'Spalte A abfragen
Sheets("Tabelle2").Cells(Target.Row, 2) = Target.Value 'Gleiche Zeile wie geänderte Zelle, Spalte B =  Wert der geänderten Zelle
End If
End Sub

https://www.herber.de/bbs/user/7806.xls
Gruß,
sam
Anzeige
DANKE
zaske
Vielen Dank,
das waren alle Befehle, die ich brauchte.
Gruß
Frank

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige