Людмила |
Отправлено: 28.12.2005, 22:05 |
|
Не зарегистрирован
|
Как макрос из Exсel
CODE |
Sub MyMacros_ruk_work()
Cells.Select
Selection.Sort Key1:=Range("C2"), Order1:=xlAscending, Key2:=Range("B2") _
, Order2:=xlAscending, Header:=xlYes, OrderCustom:=1, MatchCase:=False _
, Orientation:=xlTopToBottom, DataOption1:=xlSortNormal, DataOption2:= _
xlSortNormal
End Sub
|
перевести и запускать из приложения C++Builder ?
|
|
gvg |
Отправлено: 29.12.2005, 09:42 |
|
Машинист паровоза
Группа: Участник
Сообщений: 222
|
О работе с приложениями MS Office посмотрите в "Уроки" и "Технология OLE/COM" на этом сайте
Отредактировано gvg — 29/12/2005, 09:43 |
|
Людмила |
Отправлено: 29.12.2005, 10:44 |
|
Не зарегистрирован
|
Смотрела. Как запустить макрос — понятно.
CODE | App.OleProcedure("Run","MyMacros_ruk_work"); |
Как его написать — конкретно этот макрос изобразить
через OlePropertyGet-OlePropertySet и пр ?
|
|
gvg |
Отправлено: 29.12.2005, 11:09 |
|
Машинист паровоза
Группа: Участник
Сообщений: 222
|
Что тогда понимать под "перевести"? Я так понял, обойтись без макроса, сделав все в Билдере... Если так, то построчно все и перепишите:
CODE |
App.OlePropertyGet( "Cells" ).OleProcedure( "Select" );
..
..
|
Отредактировано gvg — 29/12/2005, 11:12 |
|