Импорт из Эксель

[Antoncheg]

Всем доброго времени суток! AX 3.0 возникает проблема с импортом значений из Эксель, заполненных вручную. Введены числовые значения, при импорте через COM_ExcelDocument_Ru эти числовые значения через any2str преобразовываются в текстовые и вставляются в поле InventTransId.Самое странное, что вставки не происходит, строки импортируются, но без этих значений!

[Gustav]

Попробуйте использовать что-то в этом духе:

    // преобразует значение Range.Value в значение, понимаемое Аксаптой
    anytype excelCellValueToAx(COMVariant cv)
    {
        anytype     retVal;

        switch (cv.variantType())
        {
            case COMVariantType::VT_BSTR:
                retVal = cv.bStr();
                break;
            case COMVariantType::VT_R8:
                retVal = cv.double();
                break;
            case COMVariantType::VT_DATE:
                retval = cv.date();
                break;
            case COMVariantType::VT_EMPTY:
                retVal = '';
                break;
            default:
                error('Unknown COMVariantType');
                throw Exception::Error;
        }
        return retVal;
    }

У вас примерно такой метод в COM_ExcelDocument_Ru подает значение на вход any2str ?

[Antoncheg]

Цитата:

Сообщение от Gustav

Попробуйте использовать что-то в этом духе:

    // преобразует значение Range.Value в значение, понимаемое Аксаптой
    anytype excelCellValueToAx(COMVariant cv)
    {
        anytype     retVal;
 
        switch (cv.variantType())
        {
            case COMVariantType::VT_BSTR:
                retVal = cv.bStr();
                break;
            case COMVariantType::VT_R8:
                retVal = cv.double();
                break;
            case COMVariantType::VT_DATE:
                retval = cv.date();
                break;
            case COMVariantType::VT_EMPTY:
                retVal = '';
                break;
            default:
                error('Unknown COMVariantType');
                throw Exception::Error;
        }
        return retVal;
    }

Спасибо большое, все ок, тема закрыта