Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
424to428
424to428
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Exceldaten kopieren

Forumthread: Exceldaten kopieren

Exceldaten kopieren
10.05.2004 12:12:25
André
Hallo Leute,
kann mir jemand mit folgendem Problem weiterhelfen?
Ich habe eine Tabelle1 in deren Spalte A Werte in fortlaufender Reihenfolge (A1,A2, ... usw.) vorhanden sind und dazukommen.
Nun soll in der Tabelle 2, B1 jedes Mal der letzte eingegebene Wert von der Spalte A, Tabelle 1 übernommen werden.
Habt Ihr eine Lösung für mich
Gruß André
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Exceldaten kopieren
Martin
Hallo André,

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Columns("A:A"), Target) Is Nothing And Target.End(xlDown).Row = 65536 Then
Worksheets("Tabelle2").Range("B1") = Target.Value
End If
End Sub

Der Code gehört in das Klassenmodul von Tabelle1, nicht in ein normales Modul.
Gruß
Martin Beck
Anzeige
AW: Exceldaten kopieren
André
hallo Martin,
es funktioniert kanns prima.
Danke für Deine Hilfe
André

Beliebteste Forumthreads (12 Monate)

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