Hallo Leute
Ihr müsst mir mal helfen. Ich versteh nicht, warum dieser Code nicht durchläuft. Ich vermute das es am Excel liegt, da ich sonst immer mit Excel Xp gearbeitet habe, aber nun EXCEL 2000 habe.
Zeile = Sheets("Tabelle2").Cells(Rows.Count, 1).End(xlUp).Row~f~
~f~Sheets("Tabelle1").Range("F1").Copy~f~
~f~Sheets("Tabelle2").Range("A" & Zeile + 1).Paste &lt--- Hier hängt der Code
"Objekt unterstützt diese Eigenschaft oder Methode nicht"
Danke
Gruß Mark