Чтение/запись в Excel с COM OLE C++ - C/C++ - Ответ 15199278

string Sheet_work_or_active = "ActiveSheet"; //  Или любое другое значение, если нужен лист по названию.
Sheet_name = "Name_List";                         //Название листа, если нужен лист по названию.
 
 
USES_CONVERSION; // Без этой штуки не работает A2OLE преобразование в LPOLESTR.
LPOLESTR Sheet_work_or_active_lpolestr = A2OLE(Sheet_work_or_active.c_str()); 
 
 
    int cArgs_parametr = 1;
        if (Sheet_work_or_active == "ActiveSheet")
        {
            cArgs_parametr = 0;
        }
        else
        {
            cArgs_parametr = 1;
        }
 
 
               //-------------------------------------------------------
        string textos_string_for_Sheet_Name;
        textos_string_for_Sheet_Name = Sheet_name;
        VARIANT Sheet_Name_bstr;
        Sheet_Name_bstr.vt = VT_BSTR;
        BSTR bstrTextos_for_Sheet_Name = _com_util::ConvertStringToBSTR(textos_string_for_Sheet_Name.c_str()); 
        Sheet_Name_bstr.bstrVal = ::SysAllocString(bstrTextos_for_Sheet_Name);
        VARIANT result;
        VariantInit(&result);
               //-------------------------------------------------------
 
 
 
        AutoWrap_write(DISPATCH_PROPERTYGET, &result, pXlApp, (LPOLESTR)Sheet_work_or_active_lpolestr, cArgs_parametr, Sheet_Name_bstr);
 
        pXlSheet = result.pdispVal;   //Этот AutoWrap возвращает имя Листа - активного или указанного по имени.