Здравствуйте, Vadim B, Вы писали:
VB>На самом деле там есть и метод для получения коллекции, но, по-моему, к нему helper function не генерируется.
VB>Попробуй вот так (это С++, не уверен, как в VB это записать):
VB>VB>MSExcel::_Worksheet sheet(...);
VB>LPDISPATCH chartObjDispatch;
VB>sheet.InvokeHelper(0x424, DISPATCH_PROPERTYGET, VT_DISPATCH, (void*)&chartObjDispatch, NULL);
VB>MSExcel::ChartObjects chartObjects(chartObjDispatch);
VB>
Большое спасибо, но там можно проще:
_Worksheet oSheet; // импортированные из Excel классы
ChartObjects obCharts;
COleVariant covOptional((long)DISP_E_PARAMNOTFOUND, VT_ERROR);
obCharts = oSheet.ChartObjects(covOptional);
вот только возникает другая проблема: как засунуть в COleVariant объект, например, Range?