Verschieben eines Tabellenblatts - Laufzeitfehler
01.05.2009 20:48:42
Andi
folgendes Problem - ich glaube stark das ihr mir helfen könnt. :-)
Ich öffne eine Arbeitsmappe per Makro. Aus dieser Arbeitsmappe soll (das einzigste) Tabellenblatt in die Arbeitsmappe verschoben werden, aus der das Makro gestartet wurde.
Es klappt alles bis nach dem Öffnen, dann kommt der 9er Fehler.
Hier der Code:
Sub entwurfopen()
Sheets("Geheim-Blatt").Visible = True
Sheets("Geheim-Blatt").Select
pfaddatei2 = Cells(3, 2).Value
Sheets("Geheim-Blatt").Visible = False
entwurf = entwurf-12
Workbooks.Open Filename:="" & pfaddatei2 & entwurf & ".xlsx" , UpdateLinks:=0
Sheets("Rechnung").Copy After:=Workbooks("rechnungsvorlage.xlsm").Sheets(1)
ActiveWindow.Close
End Sub
Kann mir jemand auf die Sprünge helfen?
Vielen Dank,
Andi