Löscht das angegebene Arbeitsblatt
#include <Excel.au3>
_Excel_SheetDelete ( $oWorkbook [, $vSheet = Default] )
$oWorkbook | Ein Arbeitsbuch-Objekt |
$vSheet | [optional] Das Arbeitsblatt, das gelöscht werden soll. Dies ist entweder Arbeitsblatt-Objekt, Arbeitsblatt-Name oder Nummer (default = keyword Default = aktives Worksheet) |
Erfolg: | 1. |
Fehler: | 0 und setzt @error. |
@error: | 1 - $oWorkbook ist kein Objekt oder kein Arbeitsbuch-Objekt 2 - Angegebenes Arbeitsblatt existiert nicht. @extended ist auf den COM Fehlercode gesetzt 3 - Error trat beim Löschen des Arbeitsblattes auf. @extended ist auf den COM Fehlercode gesetzt |
#include <Excel.au3>
#include <MsgBoxConstants.au3>
; Erstellt das Anwendungsobjekt und öffnet eine Beispiel-Arbeitsmappe
Local $oExcel = _Excel_Open()
If @error Then Exit MsgBox($MB_SYSTEMMODAL, "Excel UDF: _Excel_SheetDelete Beispiel 1", "Fehler beim Erstellen des Excel-Anwendungsobjekts." & @CRLF & "@error = " & @error & ", @extended = " & @extended)
Local $oWorkbook = _Excel_BookOpen($oExcel, @ScriptDir & "\Extras\_Excel1.xls")
If @error Then
MsgBox($MB_SYSTEMMODAL, "Excel UDF: _Excel_SheetDelete Beispiel 1", "Fehler beim Öffnen der Arbeitsmappe '" & @ScriptDir & "\Extras\_Excel1.xls'." & @CRLF & "@error = " & @error & ", @extended = " & @extended)
_Excel_Close($oExcel)
Exit
EndIf
; Löscht Blatt Nummer 1 der angegebenen Arbeitsmappe
_Excel_SheetDelete($oWorkbook, 1)
If @error Then Exit MsgBox($MB_SYSTEMMODAL, "Excel UDF: _Excel_SheetDelete Beispiel 1", "Fehler beim Löschen eines Blatts." & @CRLF & "@error = " & @error & ", @extended = " & @extended)
MsgBox($MB_SYSTEMMODAL, "Excel UDF: _Excel_SheetDelete Beispiel 1", "Das erste Blatt wurde gelöscht.")