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.")