UDF > Excel >


_Excel_BookNew

Crée un nouveau classeur

#include <Excel.au3>
_Excel_BookNew ( $oExcel [, $iSheets = Default] )

Paramètres

$oExcel Objet application Excel dans lequel le nouveau classeur sera créé
$iSheets [optionnel] Nombre de feuilles à créer dans le nouveau classeur (par défaut, Default, la valeur par défaut d'Excel). Maximum 255

Valeur de retour

Succès: Retourne un nouvel objet Classeur.
Échec: Retourne 0 et définit @error <> 0.
@error: 1 - $oExcel n'est pas un objet ou n'est pas un objet Application
2 - Erreur SheetsInNewWorkbook dans $iSheets. @extended contient le code d'erreur COM
3 - Erreur renvoyée par la méthode Workbooks.Add. @extended contient le code d'erreur COM
4 - Paramètre $iSheets < 1 ou > 255

Remarque

Il semble y avoir une limite pour la propriété SheetsInNewWorkbook fixée à 255.

En relation

_Excel_BookAttach, _Excel_BookClose, _Excel_BookOpen, _Excel_BookOpenText

Exemple

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

; Crée un objet Excel
Local $oExcel = _Excel_Open()
If @error Then Exit MsgBox($MB_SYSTEMMODAL, "UDF Excel: _Excel_BookOpen-Exemple", "Erreur lors de la création de l'objet Excel." & @CRLF & "@error = " & @error & ", @extended = " & @extended)

; *****************************************************************************
; Crée un nouveau classeur avec seulement 2 feuilles
; *****************************************************************************
_Excel_BookNew($oExcel, 2)
If @error Then Exit MsgBox($MB_SYSTEMMODAL, "UDF Excel: _Excel_BookNew-Exemple 1", "Erreur lors de la création du nouveau classeur." & @CRLF & "@error = " & @error & ", @extended = " & @extended)
MsgBox($MB_SYSTEMMODAL, "UDF Excel: _Excel_BookNew-Exemple 1", "Le classeur a été créé avec succès avec seulement deux feuilles.")