Hallo Peter
17.10.2002 19:21:14
Pius
Meine Arbeitsmappe "Liste" wird zwar geöffnet, aber in der Zeile "Cells..." des Makros bekomme ich einen Laufzeitfehler 9 (Index ausserhalb des gültigen Bereichs)
Sub Speichern()
Dim a
Dim b
Dim letzte
a = Range("B6").Value
b = Range("B7").Value
ActiveWorkbook.SaveAs Filename:="C:\Eigene Dateien\Bosshard\" & a & b & ".xls"
Workbooks.Open Filename:="C:\Eigene Dateien\Bosshard\Liste.xls"
letzte = [a65536].End(xlUp).Row
Cells(letzte, 1) = Workbooks(Fladenbrot).Sheets(1).Cells(4, 2)
Cells(letzte, 2) = Workbooks(Fladenbrot).Sheets(1).Cells(4, 6)
ActiveWorkbook.Save
End Sub
Ich hoffe ich strapaziere Deine Nerven nicht zu sehr
Gruss Pius