Как Получить значение константы xlNone из внешнего приложения

RSS

VitalyXLS

Пользователь

Сообщений: 16 Регистрация: 23.08.2016

13.11.2017 12:34:24

Добрый день ! Подскажите пожалуйста как правильно получить значение константы из внешнего приложения ? (см пример)

Код

Excel = новый COMОбъект("Excel.Application");
    
// Подключились успешно, открываем файл    
Excel.Workbooks.Open(ИмяФайла);

// ...

// Selection.Borders(xlDiagonalDown).LineStyle = xlNone
ExcelSelection.Borders(xlDiagonalDown).LineStyle = (? как тут правильно обратиться к константе ? типа Excel.xlNone)

sokol92

Пользователь

Сообщений: 4841 Регистрация: 10.09.2017

13.11.2017 13:49:16

Спросить у Excel:

Код
MsgBox xlNone

Владимир

VitalyXLS Пользователь Сообщений: 16 Регистрация: 23.08.2016	#3 13.11.2017 14:01:04 то есть мне нужно явно прописывать значение константы типа -4142 вместо xlNone ?

Казанский

Пользователь

Сообщений: 8839 Регистрация: 11.01.2013

13.11.2017 22:59:07

VitalyXLS, 3 варианта:
1. да, заменить все константы на числовые значения;
2. прописать в начале модуля или в отдельном модуле (так в VBA, в вашем языке может быть по-другому)

Код
Public Const xlNone = -4142 Public Const xlAutomatic = -4105 ' и т.д.;

3. Подключить библиотеку объектов Excel - в VBA это Tools - References - Microsoft Excel ХХ.Х Object Library. Этот способ позволит переносить куски кода, записанного макрорекордером, без доп. усилий. Но при смене версии Офиса, вероятно, придется переподключить библиотеку с актуальной версией (ХХ.Х).

Читают тему