COM-объект Сводная таблица Excel

@GrimShadow · Регистрация: 30.06.2015

Author24 — интернет-сервис помощи студентам

Доброго времени суток. Вопрос. Не могу разобраться почему не срабатывает код и выдает ошибку в строке disp_e_typemismath
Помогите разобраться, что да как.
Такой же код учувствует в другой программке, и там все ровно работает.

C#

  int lr = wb1.Sheets[1].Cells.SpecialCells(Excel.XlCellType.xlCellTypeLastCell).Row;
            string lr1 = "A1:W" + lr.ToString();
            Excel.Range oRange = wsh1.get_Range(lr1,Type.Missing);
 
           
            wshPivot = (Excel.Worksheet)wb1.Worksheets.Add();
 
            wshPivot.Name = "PivotTable";
                   
            Excel.Range oRange2 = wshPivot.Cells[3, 2];
 
 
 
 
            Excel.PivotCache oPivotCache = (Excel.PivotCache)wb1.PivotCaches().Create(Excel.XlPivotTableSourceType.xlDatabase, oRange); //Вот здесь ошибка.       Работет если явно задать координаты "Лист1!$A$1:$W$79584"
            Excel.PivotTable oPivoTable = (Excel.PivotTable)wshPivot.PivotTables().Add(oPivotCache, oRange2, "PivotTable");
            
            Excel.PivotField oPivotField = (Excel.PivotField)oPivoTable.PivotFields("Статус");
            oPivotField.set_Subtotals(1, false);
            oPivotField.Orientation = Excel.XlPivotFieldOrientation.xlRowField;
            oPivotField.Position = 1;         
 
 
            Excel.PivotField OSZPivotField = (Excel.PivotField)oPivoTable.PivotFields("Референс");
            OSZPivotField.set_Subtotals(1, false);
            OSZPivotField.Orientation = Excel.XlPivotFieldOrientation.xlDataField;
            OSZPivotField.Function = Excel.XlConsolidationFunction.xlCount;

@Pavel55 · 21.07.2016, 20:59

1) А почему люди, которые задают вопрос по Excel никогда не выкладывают свой Excel файл, с которым можно было бы потестировать код программы? Важную информацию можно заменить на 1

2) у вас переменная oRange - это объёкт (диапазон ячеек, но это объект). А "Лист1!$A$1:$W$79584" - это строка с адресом диапазона.
Думаю нужно так:
- либо oRange.Address //или возможно так oRange.Address()
- либо oRange.Address(external=True) //здесь добавиться полный путь, т.е. добавиться название листа

но это точно сработало бы в VBA, а в C# не знаю, нужно тестировать, но файла Excel нет. Так что предоставляю эту возможность вам, раз вы хотите, чтобы вам указали направление, а не дали готовое решение.

@Pavel55 996 / 355 / 135 Регистрация: 27.10.2006 Сообщений: 764
	21.07.2016, 20:59	2
	1) А почему люди, которые задают вопрос по Excel никогда не выкладывают свой Excel файл, с которым можно было бы потестировать код программы? Важную информацию можно заменить на 1 2) у вас переменная oRange - это объёкт (диапазон ячеек, но это объект). А "Лист1!$A$1:$W$79584" - это строка с адресом диапазона. Думаю нужно так: - либо oRange.Address //или возможно так oRange.Address() - либо oRange.Address(external=True) //здесь добавиться полный путь, т.е. добавиться название листа но это точно сработало бы в VBA, а в C# не знаю, нужно тестировать, но файла Excel нет. Так что предоставляю эту возможность вам, раз вы хотите, чтобы вам указали направление, а не дали готовое решение. 0

Опции темы