Страница 1 из 1
Ищу функцию
Добавлено: 15 апр 2008, 11:04
ENB83
Ищу функцию для VIP, аналог макроса Excel
Sub Макрос1()
' Макрос1
ActiveSheet.PageSetup.Zoom = 80
End Sub
Eсть же функция xlAutoFit(3,1,MaxExcelRow , MaxExcelCol);
и та, которую ищу должна быть, и вообще, как посмотреть все функции для Excel которыми можно пользоваться в VIP.
Добавлено: 15 апр 2008, 11:09
Nikos
Добавлено: 15 апр 2008, 11:20
k_vit
Посмотреть можно в файле Excel.doc
А вам можно сделать так VIP-ом :
Код: Выделить всё
...
LogStrToFile('c:\Macro.bas', ShortStrToWin('Sub Макрос1()'));
LogStrToFile('c:\Macro.bas', ShortStrToWin('ActiveSheet.PageSetup.Zoom = 80'));
LogStrToFile('c:\Macro.bas', ShortStrToWin('End Sub'));
xlImportModule('c:\Macro.bas');
xlRunMacro(ShortStrToWin('Макрос1'));
...
Добавлено: 15 апр 2008, 18:04
m0p3e
На самом деле excellib.dll экспортирует функций больше, чем описано в excel.doc. Достаточно просмотреть dll с помощью, например Dependency Walker или PAS/EXCEL/excellib.pas.
Добавлено: 16 апр 2008, 05:48
Алексей
m0p3e
Может быть кто-нибудь дополнит эту доку и выложит "свежий" вариант?

Добавлено: 16 апр 2008, 11:54
m0p3e
Может дополнит. Как только с поддержкой OpenOffice закончит.
