¿Cómo utilizar vbcomponents en vba?

Rem?Este código de muestra sirve para crear un nuevo libro de trabajo, y en el proyecto del libro de trabajo para crear un nuevo módulo 1 y escribir un procedimiento

Rem?Tools - -- referencias para marcar la casilla?Microsoft?Visual?Basic?For?Applications?5.3

El Centro de confianza necesita marcar la casilla "Confiar en el acceso al modelo de objetos del proyecto VBA".Extensibilidad?5.3

Rem?Trust Center necesita seleccionar "Confiar en el acceso al modelo de objetos del proyecto VBA"

Dim?vb?As?VBComponent,?wb?As?Workbook

Establecer ? wb?Set?wb?=?Workbooks.Add

wb.VBProject.VBComponents.Add(vbext_ct_StdModule).Name?=?"Module1"

Con?wb.VBProject. VBComponents ("Module1").CodeModule

.InsertLines?1,?" Sub?test()"

.InsertLines?2,?" msgbox?123"

.InsertLines?3,?" End?sub"

¿Fin?Con

Fin?