ich habe da ein Problem das ich irgendwie nicht in den Griff bekomme.
Ich möchte automatisch Daten in eine intelligente Tabelle (Spalte A - D) schreiben.
Ganz zu Anfang ist die Tabelle leer. Es existieren also in Zeile 1 lediglich die Überschriften und in Zeile 2 die vorgegebenen leeren Felder.
Leider funktioniert das nicht.
With Worksheets("StartSeite")
.Cells(1, 1).End(xlDown).Offset(1).End(xlUp).Row = NName
.Cells(1, 2).End(xlDown).Offset(1).End(xlUp).Row = PersNr
.Cells(1, 3).End(xlDown).Offset(1).End(xlUp).Row = NNam
.Cells(1, 4).End(xlDown).Offset(1).End(xlUp).Row = VNam
End With
So sieht das ganze bei mir aus. Ich habe bestimmt irgendwo einen Denkfehler, aber ich finde ihn nicht.
Geht das überhaupt was ich hier vorhabe? Ich weiss wohl das ich an anderer Stelle mal eine Tabelle automatisch in eine intelligente Tabelle übertragen habe. Aber dafür habe ich immer per Makro die intelligente Tabelle gelöscht und neu wieder aufgebaut. Geht doch bestimmt einfacher, oder?
Liebe Grüße
Steve