Objet Classeur (Excel)Workbook object (Excel)

Cet objet représente un classeur Microsoft Excel.Represents a Microsoft Excel workbook.

RemarquesRemarks

L’objet Workbook est membre de la collection Workbooks .The Workbook object is a member of the Workbooks collection. La collection Workbooks contient tous les objets Workbook actuellement ouverts dans Microsoft Excel.The Workbooks collection contains all the Workbook objects currently open in Microsoft Excel.

La propriété ThisWorkbook de l’objet application renvoie le classeur dans lequel le code Visual Basic est en cours d’exécution.The ThisWorkbook property of the Application object returns the workbook where the Visual Basic code is running. Il s'agit généralement du classeur actif.In most cases, this is the same as the active workbook. Toutefois, si le code Visual Basic fait partie d'une macro complémentaire, la propriété ThisWorkbook ne renverra pas le classeur actif.However, if the Visual Basic code is part of an add-in, the ThisWorkbook property won't return the active workbook. Dans ce cas, le classeur actif est celui appelant la macro complémentaire, alors que la propriété ThisWorkbook renvoie le classeur de la macro complémentaire.In this case, the active workbook is the workbook calling the add-in, whereas the ThisWorkbook property returns the add-in workbook.

Si vous créez un complément à partir de votre code Visual Basic, vous devez utiliser la propriété ThisWorkbook pour qualifier toute instruction qui doit être exécutée sur le classeur que vous compilez dans le complément.If you are creating an add-in from your Visual Basic code, you should use the ThisWorkbook property to qualify any statement that must be run on the workbook that you compile into the add-in.

ExempleExample

Utilisez Workbooks (index), où index est le numéro d’index ou le nom du classeur, pour renvoyer un seul objet Workbook .Use Workbooks (index), where index is the workbook name or index number, to return a single Workbook object. L'exemple suivant montre comment activer le classeur 1.The following example activates workbook one.

Workbooks(1).Activate

Le numéro d'index indique l'ordre dans lequel les classeurs ont été ouverts ou créés.The index number denotes the order in which the workbooks were opened or created. Workbooks(1) est le premier classeur créé et Workbooks(Workbooks.Count) le dernier.Workbooks(1) is the first workbook created, and Workbooks(Workbooks.Count) is the last one created. Le fait d'activer un classeur ne modifie pas son numéro d'index.Activating a workbook doesn't change its index number. Tous les classeurs sont inclus dans le nombre d’index, même s’ils sont masqués.All workbooks are included in the index count, even if they are hidden.


La propriété Name renvoie le nom du classeur.The Name property returns the workbook name. Vous ne pouvez pas définir le nom en utilisant cette propriété ; si vous devez changer le nom, utilisez la méthode SaveAs pour enregistrer le classeur sous un nom différent.You cannot set the name by using this property; if you need to change the name, use the SaveAs method to save the workbook under a different name.

L'exemple suivant montre comment activer la feuille Sheet1 dans le classeur intitulé Cogs.xls (le classeur doit être déjà ouvert dans Microsoft Excel).The following example activates Sheet1 in the workbook named Cogs.xls (the workbook must already be open in Microsoft Excel).

Workbooks("Cogs.xls").Worksheets("Sheet1").Activate

La propriété ActiveWorkbook de l’objet application renvoie le classeur actif.The ActiveWorkbook property of the Application object returns the workbook that's currently active. L'exemple suivant définit le nom de l'auteur dans le classeur actif.The following example sets the name of the author for the active workbook.

ActiveWorkbook.Author = "Jean Selva"

Cet exemple montre comment envoyer un onglet de feuille de calcul à partir du classeur actif à l’aide d’une adresse e-mail et de l’objet spécifiés.This example emails a worksheet tab from the active workbook by using a specified email address and subject. Pour exécuter ce code, la feuille de calcul active doit contenir l'adresse de messagerie dans la cellule A1, l'objet dans la cellule B1, et le nom de la feuille de calcul à envoyer dans la cellule C1.To run this code, the active worksheet must contain the email address in cell A1, the subject in cell B1, and the name of the worksheet to send in cell C1.

Sub SendTab()
   'Declare and initialize your variables, and turn off screen updating.
   Dim wks As Worksheet
   Application.ScreenUpdating = False
   Set wks = ActiveSheet
   
   'Copy the target worksheet, specified in cell C1, to the clipboard.
   Worksheets(Range("C1").Value).Copy
   
   'Send the content in the clipboard to the email account specified in cell A1,
   'using the subject line specified in cell B1.
   ActiveWorkbook.SendMail wks.Range("A1").Value, wks.Range("B1").Value
   
   'Do not save changes, and turn screen updating back on.
   ActiveWorkbook.Close savechanges:=False
   Application.ScreenUpdating = True
End Sub

ÉvénementsEvents

MéthodesMethods

PropriétésProperties

Voir aussiSee also

Assistance et commentairesSupport and feedback

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ?Have questions or feedback about Office VBA or this documentation? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.