Доброго времени суток.

Очень бы хотелось понять как можно ПРОГРАММНО добавить макрос на лист Экселя. Не отказался бы от примера кода (если он у Вас есть).

Задача у меня такая:
-есть одна книга с набором макросов в ней. В Экселе вместе с ней открывается еще одна книга с прайс-листом.
Так вот — мне нужно из моей книги с макросами запустить макрос, добавляющий код отсылки содержимого прайс-листа от нашего клиента к нам (после того, как клиент отметит в прайс-листе что ему нужно). Если бы эти прайсы я бы готовил, то все бы ничего. Но этим должна заниматься ничего ни понимающая "девочка-обезьянка". Поэтому никакие "нажми Alt+F8" тут не пройдут... Вот такая беда.

Заранее благодарю за помощь.

Мой ответ на мой же вопрос:

Sub test()
    Dim s As String
    s = "sub mytest()" + Chr(13) + Chr(10) + "MsgBox 1" + Chr(13) + Chr(10) + "End Sub"
    
    ActiveWorkbook.VBProject.VBComponents.Item(1).CodeModule.AddFromString s
End Sub