Supportnet Computer
Planet of Tech

Supportnet / Forum / Tabellenkalkulation

Excel Tabellen verknüpfen zum Archivieren





Frage

HALLO unzwar habe ich folgendes problem: ich möchte gerne 2 Tabellen so verknüpfen das wenn ich in tabelle eins etwas eintrage es automatisch in tabelle 2 drin ist. so meine problematik ist (nach dem ich mich an diesem makri versucht habe [b]Private Sub Worksheet_Change(ByVal Target As Range) Dim Datum_A1 As Date, Datum_B1 As Date, Zeile_A As Long, Zeile_B As Long Datum_A1 = Range("A1") Datum_B1 = Range("B1") Zeile_A = Sheets("Tabelle2").Range("A65536").End(xlUp).Offset(1, 0).Row Zeile_B = Sheets("Tabelle2").Range("B65536").End(xlUp).Offset(1, 0).Row If Target.Cells.Address = "$A$1" Then Sheets("Tabelle2").Cells(Zeile_A, 1) = CDate(Datum_A1) End If If Target.Cells.Address = "$B$1" Then Sheets("Tabelle2").Cells(Zeile_B, 2) = CDate(Datum_B1) End If End Sub[/b] das das ja soweit gut funktioniert nur ich brauche es so das es nicht nur das datum von T1 A1 in die nächste leere zelle der T2 spalte A macht. sondern auch von A2-A5 und das selbe mit B-G . ich komm einfach nicht weiter immer wenn ich was an der formel änder geht nichts mehr. bin aber auch nen anfänger vllt kann mir ja jemand helfen. gruß

Antwort von