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

Worksheet_Change Ereignis

Forumthread: Worksheet_Change Ereignis

Worksheet_Change Ereignis
02.05.2007 11:29:00
Josef
Hallo!
Ich würde bitte folgende VBA Lösung suchen:
Wenn ich im Tabellenblatt "Leistungen" in der Spalte A ab der Zeile 2 eine Zahl eingebe dann soll diese Zahl automatisch im Tabellenblatt "Tabelle1" in der Spalte C in die nächste freie Zelle geschrieben werden.
Beispiel: "Leistungen" A2 = 2050366 "Tabelle 1" nächste freie Zelle z.B. C201 = Eintrag 2050366 in C201
"Leistungen" A3 = 2060255 "Tabelle 1" nächste freie Zelle C202 = Eintrag 2060255 in C202 usw.
Danke
Josef

Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Worksheet_Change Ereignis
02.05.2007 11:33:00
Rudi
Hallo,

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 1 And Target.Row > 1 Then
Sheets("tabelle1").Cells(Rows.Count, 3).End(xlUp).Offset(1, 0) = Target
End If
End Sub


Gruß
Rudi
Eine Kuh macht Muh, viele Kühe machen Mühe

Anzeige
AW: Worksheet_Change Ereignis
02.05.2007 12:07:39
Josef
Hallo Rudi !
Danke für Deine Antwort und Deine Hilfe. Funktioniert bestens.
Josef
;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige