Supprime la feuille d�sign�e par l'objet, le nom ou par l'index
#include <Excel.au3>
_Excel_SheetDelete ( $oWorkbook [, $vSheet = Default] )
$oWorkbook | L'objet classeur |
$vSheet | [optionnel] La feuille � supprimer, soit par l'objet, le nom, ou par son index (par d�faut = mot-cl� Default = Feuille active) |
Succ�s: | Retourne 1. |
�chec: | Retourne 0 et d�finit @error <> 0. |
@error: | 1 - $oWorkbook n'est pas un objet ou n'est pas un objet classeur 2 - La feuille sp�cifi�e n'existe pas. @extended contient le code d'erreur COM 3 - Une erreur s'est produite lors de la suppression de la feuille. @extended contient le code d'erreur COM |
#include <Excel.au3> #include <MsgBoxConstants.au3> ; Cr�e un objet Excel et ouvre un classeur Local $oExcel = _Excel_Open() If @error Then Exit MsgBox($MB_SYSTEMMODAL, "UDF Excel: _Excel_SheetDelete-Exemple", "Erreur lors de la cr�ation de l'objet Excel." & @CRLF & "@error = " & @error & ", @extended = " & @extended) Local $oWorkbook = _Excel_BookOpen($oExcel, @ScriptDir & "\Extras\_Excel1.xls") If @error Then MsgBox($MB_SYSTEMMODAL, "UDF Excel: _Excel_SheetDelete-Exemple", "Erreur lors de l'ouverture du classeur '" & @ScriptDir & "\Extras\_Excel1.xls'." & @CRLF & "@error = " & @error & ", @extended = " & @extended) _Excel_Close($oExcel) Exit EndIf ; ***************************************************************************** ; Supprime la feuille num�ro 1 du classeur sp�cifi� ; ***************************************************************************** _Excel_SheetDelete($oWorkbook, 1) If @error Then Exit MsgBox($MB_SYSTEMMODAL, "UDF Excel: _Excel_SheetDelete-Exemple 1", "Erreur lors de la suppression de la feuille." & @CRLF & "@error = " & @error & ", @extended = " & @extended) MsgBox($MB_SYSTEMMODAL, "UDF Excel: _Excel_SheetDelete-Exemple 1", "La premi�re feuille a �t� supprim�e.")