Конференция VBStreets

**Ramzes** » 24.01.2005 (Пн) 18:09

Как добавить макрос в Лист EXCEL Разумееться из VB :?:

**tyomitch** » 24.01.2005 (Пн) 18:48

Через Workbook.VBProject

**Ramzes** » 24.01.2005 (Пн) 18:52

А точнне можно, просто работы щас немерено, и я просто не успеваю разобраться.

ПЛИЗ

**tyomitch** » 24.01.2005 (Пн) 18:55

Код: Выделить всё: Workbook.VBProject.VBComponents(1).CodeModule.AddFromString "Sub Макрос1" & vbCrLf & "MsgBox ""Hello!""" & vbCrLf & "End Sub"

**Ramzes** » 24.01.2005 (Пн) 18:57

Спасибо.

**Ramzes** » 25.01.2005 (Вт) 10:41

А как теперь создать кнопку на панели инструментов, и назначить ей тот макрос который я записал, если я знаю его имя.

Тоже из VB

**RayShade** » 25.01.2005 (Вт) 11:21

Что то типа:

Код: Выделить всё: Set mBTN = mBAR.Controls.Add(msoControlButton, , , , False) mBTN.FaceId = 1020 mBTN.Style = msoButtonIcon mBTN.OnAction = "имя процедуры, вызываемой по кнопке"

А mBAR - это ссылка на тулбар, в который ты добавляешь кнопку.

**Ramzes** » 25.01.2005 (Вт) 11:26

А что такое mBar

**tyomitch** » 25.01.2005 (Вт) 12:19

Код: Выделить всё: Set mBar = Application.CommandBars.Add("Название панели")

Как добавить макрос