ich war schon glücklich, dass ich es geschafft habe, mit folgendem Code aus einer Vorlage ein Tabellenblatt in ein Workbook zu kopieren, in dem gerade gearbeitet wird.
Windows(arbeit).Activate
Sheets(Sheets.Count).Activate
s = Sheets.Count
ActiveSheet.Rows(2).Delete Shift:=xlUp
Windows("Ableitung_RS-Tabelle.xls").Activate
Sheets("Rohschädigung").Copy After:=Workbooks(arbeit).Sheets(s)
Frage 1:
Warum funktioniert es in der letzten Zeile nicht mit "[...]:=Workbooks(arbeit).Sheets(Sheets.Count)" ?
Bekomme da immer "Laufzeitfehler '9': Index außerhalb des gültigen Bereichs "
Frage 2:
Hab jetzt das Problem, dass er beim kopieren die Referenz zur Vorlage-Tabelle beibehält, was dann so
='[Vorlage Rohschädigungsblatt.xls]statKennwerte_TecWare_'!B3
statt so
=statKennwerte_TecWare_!B3
aussieht!
Wie kann ich das beheben, ohne die Formeln alle neu einzutragen?
Vielen Dank schonmal für eure Hilfe!
Gruß
steffen