Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.03.27;
Скачать: CL | DM;

Вниз

EXCEL: создание особого файла...   Найти похожие ветки 

 
VID ©   (2003-03-11 21:59) [0]

Возникла необходимость реализации такой задачи:
создание EXCEL совместимого файла, который при своём запуске сделает следущее:
1. Создаст макрос с таким кодом
Sub SetTextFormat()
Cells.Select
Range("D1").Activate
Selection.NumberFormat = "@"
Range("A1").Select
End Sub
2. На панели инструментов в любом месте добавит кнопку какую-нить, и присвоит ей выполнение этого макроса.
Созданный макрос ( и кнопка на панели инструментов) должен сохранятся в экселе и после закрытия этого самого экселя.

Кто может, помогите пожалуйста, а то проект надо сдавать в ближайшее время, а дело вот за этим стало.


 
sad ©   (2003-03-12 10:08) [1]

в экскел файле открываешь редактор Visual Basic, находишь на вкладке VBA project Эта книга в редакторе кода выбираешь Workbook процедура Open вставляешь
Application.CommandBars("Formatting").Controls.Add Type:=msoControlButton, _
ID:=2950, Before:=1, Temporary:=True
Application.CommandBars("Formatting").Controls(1).OnAction = "SetTextFormat"
макрос должен уже быть написан ,
при открытии документа создается кнопка на нее навешивается выполнение твоего макроса,
Temporery указывает на то, что после закрытия экселя кнопка удаляется.
работает в XP



Страницы: 1 вся ветка

Текущий архив: 2003.03.27;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.014 c
3-87775
Behemoth
2003-03-07 12:12
2003.03.27
Доступ к BDE через Web


14-88139
Danilka
2003-03-05 09:25
2003.03.27
Выстраданый совет...


1-88039
seledka
2003-03-14 16:17
2003.03.27
файлы и директории


1-88040
ki11er
2003-03-14 19:40
2003.03.27
Какая разница между override, reintroduce и


4-88303
AllDontFire
2003-01-30 12:01
2003.03.27
Не работает GetBinaryType