Страница: 1 |
Страница: 1 |
Вопрос: народ помогите сделать
Добавлено: 09.05.05 16:45
Автор вопроса: yrka
1. При открытии файла с программой в стандартном интерфейсе Excel должна появляться кнопка , предназначенная для вызова формы, реализованной в прог.
2. При закрытии файла с программой привнесенный пользовательский интерфейс должен удаляться
И еще один вопрос, как проверить наличие листа в другой книге,т.е. если прога находится в одной книге а лист в другой
Ответы
Всего ответов: 1
Номер ответа: 1
Автор ответа:
Дмит
Вопросов: 11
Ответов: 160
Web-сайт:
Профиль | | #1
Добавлено: 09.05.05 17:44
Private Sub Workbook_BeforeClose(Cancel As Boolean)
On Error Resume Next
Application.CommandBars(1).Controls("MyBut".Delete
End Sub
Private Sub Workbook_Open()
Dim Bm As CommandBarButton
Set Bm = Application.CommandBars(1).Controls.Add(Type:=msoControlButton, Temporary:=True)
With Bm
.Caption = "MyBut"
.OnAction = "startForma"
.FaceId = 59
End With
End Sub
Кнопка появится в главном меню.