Créer un nouveau classeur

Pour créer un nouveau classeur, utilisez simplement des classeurs.Add:

Workbooks.Add

Le classeur nouvellement ajouté est maintenant le classeur ActiveWorkbook.

Vous pouvez le voir en utilisant ce code:

Sub AddWB()Workbooks.AddMsgBox ActiveWorkbook.NameEnd Sub

Créer un nouveau classeur &Attribuer à l’objet

Vous pouvez utiliser l’objet ActiveWorkbook pour faire référence au nouveau classeur. En utilisant cela, vous pouvez affecter le nouveau classeur à une variable:

Dim wb as WorkbookWorkbooks.AddSet wb = ActiveWorkbook

Mais, il est préférable d’affecter le classeur à une variable lorsque le classeur est créé:

Dim wb As WorkbookSet wb = Workbooks.Add

Maintenant, vous pouvez référencer le nouveau classeur par son nom de variable

MsgBox wb.Name

Créer un nouveau classeur&Save

Vous pouvez également créer un nouveau classeur et l’enregistrer immédiatement:

Workbooks.Add.SaveAs Filename:="NewWB"

Cela enregistrera le classeur en tant que.fichier xlsx dans votre dossier par défaut (ex. Mes documents). Au lieu de cela, vous pouvez personnaliser le SaveAs avec notre guide d’enregistrement des classeurs.

Maintenant, vous pouvez vous référer au classeur par son nom:

Workbooks("NewWB.xlsx").Activate

Ce code activera « NewWB.xlsx”.

Créer un nouveau classeur &Ajouter des feuilles

Après avoir créé un classeur, vous pouvez le modifier. Voici juste un exemple pour ajouter deux feuilles au nouveau classeur (en supposant qu’il s’agisse du livre de travail actif) :

ActiveWorkbook.Worksheets.Add Count:=2