Funktionreferenz


_Excel_BookClose

Beschreibung anzeigen in

Schließt das angegebene Arbeitsbuch (Workbook)

#include <Excel.au3>
_Excel_BookClose ( $oWorkbook [, $bSave = True] )

Parameter

$oWorkbook Arbeitsbuch (Workbook) Objekt
$bSave [optional] Wenn True, dann wird das Arbeitsbuch (Workbook) vor dem Schließen gespeichert (Standard = True)

Rückgabewert

Erfolg: 1.
Fehler: 0 und setzt @error.
@error: 1 - $oWorkbook ist kein Objekt oder kein Arbeitsbuch (Workbook)-Objekt
2 - Ein Fehler trat auf, als das Arbeitsbuch gespeichert wurde. @extended ist auf den COM Fehlercode gesetzt, zurückgegeben von der Save-Methode
3 - Ein Fehler trat auf, als das Arbeitsbuch geschlossen wurde. @extended ist auf den COM Fehlercode gesetzt, zurückgegeben von der Close-Methode

Verwandte Funktionen

_Excel_BookAttach, _Excel_BookNew, _Excel_BookOpen, _Excel_BookOpenText

Beispiel

#include <Excel.au3>
#include <MsgBoxConstants.au3>

; Erstellt das Anwendungsobjekt
Local $oExcel = _Excel_Open()
If @error Then Exit MsgBox($MB_SYSTEMMODAL, "Excel UDF: _Excel_BookClose Beispiel 1", "Fehler beim Erstellen des Excel-Anwendungsobjekts." & @CRLF & "@error = " & @error & ", @extended = " & @extended)

; Erstellt eine neue Arbeitsmappe, schreibt einige Daten und schließt die Mappe ohne sie zu speichern
; Erstellte eine neue Arbeitsmappe
Local $oWorkbook = _Excel_BookNew($oExcel)
If @error Then Exit MsgBox($MB_SYSTEMMODAL, "Excel UDF: _Excel_BookClose Beispiel 1", "Fehler beim Erstellen der neuen Arbeitsmappe." & @CRLF & "@error = " & @error & ", @extended = " & @extended)
; Schreibt Daten in Zelle A1
_Excel_RangeWrite($oWorkbook, Default, "Test", "A1")
If @error Then Exit MsgBox($MB_SYSTEMMODAL, "Excel UDF: _Excel_BookClose Beispiel 1", "Fehler beim Schreiben in Zelle 'A1'." & @CRLF & "@error = " & @error & ", @extended = " & @extended)
MsgBox(64, "Excel UDF: _Excel_BookClose Beispiel 1", "Auf OK klicken, um die Arbeitsmappe ohne Speichern zu schließen.")
; Schließt die Arbeitsmappe ohne sie zu speichern
_Excel_BookClose($oWorkbook, False)
If @error Then Exit MsgBox($MB_SYSTEMMODAL, "Excel UDF: _Excel_BookClose Beispiel 1", "Fehler beim Schließen der Arbeitsmappe." & @CRLF & "@error = " & @error & ", @extended = " & @extended)
MsgBox($MB_SYSTEMMODAL, "Excel UDF: _Excel_BookClose Beispiel 1", "Arbeitsmappe wurde erfolgreich geschlossen.")