Hallo zusammen,
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