Laufzeitfehler 1004
25.08.2013 17:50:37
Tobias
ich habe eine userform für ein Kassenbuch erstellt. Beim Initialisieren dieser form öffne und aktiviere ich die Kassenbuch-Excel, was auch über folgenden Code funktioniert:
Public Function aktuellesKassenbuchAktivieren(year As Integer) As Boolean
Dim dateiPfad As String
dateiPfad = ThisWorkbook.Path & ":Listen:Kassenbuch_" & year & ".xlsx"
Workbooks.Open dateiPfad
Application.Windows("Kassenbuch_" & year & ".xlsx").Activate
aktuellesKassenbuchAktivieren = True
End Function
Nun will ich über einen CommandButton (Abbrechen) die userform und die geöffnete Kassenbuch-Excel wieder schließen. Der Code dazu sieht so aus:Private Sub cmdAbbrechen_Click()
Dim year As Integer
year = DatePart("YYYY", Date)
Workbooks("Kassenbuch_" & year & ".xlsx").Close savechanges:=False
Unload frmKassenbuch 'Die userform für die Kassenbuch-Excel
End Sub
An der Stelle:
Workbooks("Kassenbuch_" & year & ".xlsx").Close savechanges:=False
bekomme ich folgenden Laufzeitfehler:
Laufzeitfehler 1004.:
Fehler der Methode "Close" des Objekts "_Workbook".
Ich benutze Office 2011 for Mac.
Bitte, bitte helft mir, denn ich weiß nicht mehr weiter & sehe den Wald vor lauter Bäumen nicht mehr ;-)
Für Eure Hilfe/Antworten danke ich vielmals vorab
Grüße
Tobi