Workbook close
18.04.2006 18:44:33
Torsten
ich benötige dringend Hilfe da ich am verzweifeln bin. Ich habe ein Workbook ("Mappe1.xls"), indem ich durch Klick ein anderes Workbook lade ("Mappe2.xls"). Wenn Mappe2.xls geladen wird, so sollte Mappe1.xls automatisch geschlossen werden, was aber nicht passiert.
Fehlermerldung "Laufzeitfehler 9: Index außerhalb des gültigen Bereichs". Wenn ich aber die Mappe1 starte und die Mappe2 direkt über den Explorer statt über das Makro zu starten funktionierts. Habe keine Ahnung woran das liegen könnte.
Vielleicht hat jemand Zeit und Muße mir zu helfen.
' das steht in Mappe1.xls
Private Sub CommandButton1_Click()
Dim ExcelSheet As Object
Set ExcelSheet = CreateObject("Excel.Application")
ExcelSheet.Application.Workbooks.Open Filename:="C:\test\Mappe2.xls", UpdateLinks:=3
End Sub
' und das in Mappe2.xls
Private Sub Workbook_Open()
Workbooks("Mappe1").Close savechanges:=False
End Sub
Vielen Dank für Eure Hilfe