Pour ajouter un nouveau module à un classeur, utilisez la méthode Add. Dans l’exemple suivant, un nouveau module nommé nouveaumodule est ajouté au classeur actif.
Sub NouveauModuAjouter () Dim VBComp As VBComponent Set VBComp = _ ThisWorkbook.VBProject.VBComponents.Add _ (vbext_ct_StdModule) VBComp.Name = "nouveaumodule" Application.Visible = True End Sub
La méthode Add utilise la constante vbext_ct_StdModule, qui représente un module normal.
Bien sûr, vous pouvez également insérer des modules de classe et des UserForms dans votre projet en utilisant cette méthode. Pour ce faire, reportez-vous à la figure suivant pour les constantes nécessaires.
| Constante | Description |
| Vbext_ct_ClassModule | Ajoute un module de classe à la collection. |
| Vbext_ct_MSForm | Ajoute un formulaire à la liste. |
| Vbext_ct_StdModule | Ajoute un module standard à la collection. |