Как програмно удалить макрос из Excel?

workbooks("book1").VBProject.VBComponents(5).CodeModule.DeleteLines 2,1

Удаляет строку номер 2 из модуля номер 5

TopList Rambler's Top100