Ferme le classeur sp�cifi�
#include <Excel.au3>
_Excel_BookClose ( $oWorkbook [, $bSave = True] )
| $oWorkbook | Objet Workbook, classeur Excel |
| $bSave | [optionnel] Si True le classeur est enregistr� avant la fermeture (par d�faut = True) |
| 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 - Une erreur s'est produite lors de l'enregistrement du classeur. @extended contient le code d'erreur retourn� par le COM Proc�d� Language 3 - Une erreur s'est produite lors de la fermeture du classeur. @extended contient le code d'erreur COM retourn� par la m�thode Close |
_Excel_BookAttach, _Excel_BookNew, _Excel_BookOpen, _Excel_BookOpenText
#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, �crit des donn�es et le ferme sans le sauvegarder ; ***************************************************************************** ; Cr�e le nouveau classeur Local $oWorkbook = _Excel_BookNew($oExcel) If @error Then Exit MsgBox($MB_SYSTEMMODAL, "UDF Excel: _Excel_BookClose-Exemple", "Erreur lors de la cr�ation d'un nouveau classeur." & @CRLF & "@error = " & @error & ", @extended = " & @extended) ; �crit un mot dans la cellule A1 _Excel_RangeWrite($oWorkbook, Default, "Test", "A1") If @error Then Exit MsgBox($MB_SYSTEMMODAL, "UDF Excel: _Excel_BookClose-Exemple", "Erreur lors de l'�criture dans la cellule 'A1'." & @CRLF & "@error = " & @error & ", @extended = " & @extended) MsgBox(64, "UDF Excel: _Excel_BookClose-Example", "Cliquez OK pour fermer le classeur sans le sauvegarder.") ; Ferme le classeur sans le sauvegarder _Excel_BookClose($oWorkbook, False) If @error Then Exit MsgBox($MB_SYSTEMMODAL, "UDF Excel: _Excel_BookClose-Exemple", "Erreur lors de la sauvegarde du classeur." & @CRLF & "@error = " & @error & ", @extended = " & @extended) MsgBox($MB_SYSTEMMODAL, "UDF Excel: _Excel_BookClose-Exemple", "Le classeur a �t� ferm� avec succ�s.")