Retourne une liste de toutes les feuilles d'un classeur donn�
#include <Excel.au3>
_Excel_SheetList ( $oWorkbook )
| $oWorkbook | L'objet classeur |
| Succ�s: | Retourne un tableau � deux dimensions index� � partir de 0 avec les informations suivantes: 0 - Le nom de la feuille de calcul 1 - L'objet feuille de calcul |
| �chec: | Retourne 0 et d�finit @error <> 0. |
| @error: | 1 - $oWorkbook n'est pas un objet ou n'est pas un objet classeur |
#include <Array.au3> #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_SheetList-Exemple", "Erreur lors de la cr�ation de l'objet Excel." & @CRLF & "@error = " & @error & ", @extended = " & @extended) Local $oWorkbook = _Excel_BookOpen($oExcel, @ScriptDir & "\Extras\_Excel2.xls") If @error Then MsgBox($MB_SYSTEMMODAL, "UDF Excel: _Excel_SheetList-Exemple", "Erreur lors de l'ouverture du classeur '" & @ScriptDir & "\Extras\_Excel2.xls'." & @CRLF & "@error = " & @error & ", @extended = " & @extended) _Excel_Close($oExcel) Exit EndIf ; Affiche une liste de toutes les feuilles du classeur Local $aWorkSheets = _Excel_SheetList($oWorkbook) If @error Then Exit MsgBox($MB_SYSTEMMODAL, "UDF Excel: _Excel_SheetList-Exemple 1", "Erreur lors de l'�num�ration des feuilles." & @CRLF & "@error = " & @error & ", @extended = " & @extended) _ArrayDisplay($aWorkSheets, "UDF Excel: _Excel_SheetList-Exemple 1")