Имя: Пароль:
1C
1С v8
Как выполнить макрос для Excel из 1с
,
0 zett
 
08.10.12
15:31
Добрый день!Подскажите как из под 1с для созданной кнопки в листе Excel присвоить ей макрос отрабатываемый в 1с!

Ексель = Новый COMОбъект("Excel.Application");
Книга = Ексель.Workbooks.Open(ИмяФайлаЕксель);
Лист = Книга.Worksheets(1).UsedRange;
//Создание Кнопки
Кнопка=Книга.Sheets(1).Buttons.Add(379.5, 72.75, 89.25, 31.5);
Кнопка.Caption="CommandButton1";
Кнопка.Name="Очистить";
1 zett
 
08.10.12
15:34
Книга.VBProject не работает.
2 План счетов
 
08.10.12
15:39
в 7.7 у меня так запускается:
..............
Worksheet = WorkBook.Worksheets("Календарь");    
//Запускаю макрос заполнения дней в календаре
Worksheet.Activate();
Application.Visible=1;
Window.Visible=1;        
Попытка        
   Парамер = ",Календарь,Год,"+Строка(ДатаГод(НаДату));
   Application.Run ("DateFrom1S("""+Парамер+""")");            
Исключение
   Сообщить(ОписаниеОшибки());
КонецПопытки;
3 manyak
 
08.10.12
15:45
макрос 1совский или те нужно программно создать кнопку в экселе и программно присвоить ей макрос ЭКСЕЛЕВСКИЙ?
если макрос экселевский то юзай:
.OnAction = "Макрос1"
4 zett
 
08.10.12
15:49
Нужно программно установить кнопку и добавить макрос, привязанный к ней в Excel.
сам макрос есть.
5 manyak
 
08.10.12
15:50
ну тогда (3) тебе в помощь
6 zett
 
08.10.12
15:54
(5) а как добраться до "OnAction" ?
7 manyak
 
08.10.12
15:58
кнопка.OnAction = "Макрос1" поидее, попробуй
сам запиши макрос в котором создашь кнопку и присвой ей макрос из списка, будет тебе код с  OnAction. яж так и сделал - просто уже удалил :)
8 manyak
 
08.10.12
16:01
вот:
ActiveSheet.Buttons.Add(317.25, 78.75, 78.75, 16.5).Select
Selection.OnAction = "Макрос1"
9 zett
 
08.10.12
16:04
(8) макрос есть и он работает, проблема добраться до установки текста макроса на кнопку ПРОГРАММНО из 1С.

На данный момент есть COM объект (книга эксель) в которую вставляется кнопка, а на неё вешается макрос, который не понятно как туда впихать. :)
10 manyak
 
08.10.12
16:06
а (8) че не программно думаешь? :)
11 zett
 
08.10.12
16:07
(10) ок. а можно тогда пример кода, как из 1С через ком-объект добавить строки в макрос ? :)
12 manyak
 
08.10.12
16:08
и у тебя смотрю другой вопрос уже: непонятно как макрос впихать, а макрос типа вешается у тебя нормально.
13 manyak
 
08.10.12
16:09
так и спрашивай: как программно создать в книге макрос с известным кодом, а не как привязать к кнопке макрос
14 manyak
 
08.10.12
16:12
15 zett
 
08.10.12
16:19
(14) смотрел.
Проблема в том, что по указанному пути не получается добраться:

http://s57.radikal.ru/i156/1210/a5/6d486189edfc.png
16 manyak
 
08.10.12
16:52
выожи свой код
17 manyak
 
08.10.12
16:58
вот еще покури:
http://support.microsoft.com/kb/194611