使用Interop c＃在Microsoft Excel中检测数据透视表

Question

我试图通过使用Microsoft Interop c＃来检测Microsoft Excel中的单元格是否包含数据透视表

我想要做的是循环遍历所有单元格，如下面的代码所示，然后如果单元格包含数据透视表，我想将该单元格的行和列信息存储为整数值，如下所示：

int rowCount = xlRange.Rows.Count;
int colCount = xlRange.Columns.Count;

Excel.Range cell = null;

for (int iRow = 1; iRow < rowCount; iRow++)
{
    for (int iCol = 1; iCol <= colCount; iCol++)
    {
        /* This line of code is probably wrong */
        cell = xlRange.Cells[iRow, iCol] as Excel.Range;

        if(/*Cell contains PivotTable*/)
        {
            int rowLocation = iRow;
            int colLocation = iCol;
        }
    }
}

我已经尝试过查看MSDN和其他来源，但似乎无法找到任何方法来检测单元格是否包含数据透视表。

任何帮助表示赞赏，谢谢。

Answer 1

这是一些供参考的代码。 确定工作表中数据透视表占用的整个范围，并验证单元格是否是范围的一部分。

private Excel.Range IdentifyPivotRanges(Excel.Range xlRange)
{
    Excel.Range pivotRanges = null;
    Excel.PivotTables pivotTables = xlRange.Worksheet.PivotTables();
    int pivotCount = pivotTables.Count;
    for (int i = 1; i <= pivotCount; i++)
    {
        Excel.Range tmpRange = xlRange.Worksheet.PivotTables(i).TableRange2;
        if (pivotRanges == null) pivotRanges = tmpRange;
        pivotRanges = this.Application.Union(pivotRanges, tmpRange);
    }
    return pivotRanges;
}

private void CheckCellsForPivot(Excel.Range xlRange)
{
    Excel.Range pivotRange = IdentifyPivotRanges(xlRange);
    int rowCount = xlRange.Rows.Count;
    int colCount = xlRange.Columns.Count;
    for (int iRow = 1; iRow <= rowCount; iRow++)
    {
        for (int iCol = 1; iCol <= colCount; iCol++)
        {
            var cell = xlRange.Cells[iRow, iCol];
            if (Application.Intersect(pivotRange, cell) != null)
            {
                int rowLocation = iRow;
                int colLocation = iCol;
            }
        }
    }
}

Answer 2

看看这里有几个关于循环数据透视表列表的例子

pivotSheet.Activate();
Microsoft.Office.Interop.Excel.PivotTables pivotTables = 
        (Microsoft.Office.Interop.Excel.PivotTables)pivotSheet.PivotTables(missing);
int pivotTablesCount = pivotTables.Count;

从C＃刷新Excel数据透视表

Answer 3

扩展CS的答案：我使用了CS的答案，但进行了一些修改，以便您只需要通往WorkBook的路径。 无需范围，只需传递工作簿中的工作表即可。

#region PivotTables

public static List<DataTable> PivotCollection(string filePath)
{
    List<DataTable> pivotCollection = new List<DataTable>();

    //Get Workbook
    xl.Application app = new xl.Application();
    xl.Workbook wb = null;
    wb = app.Workbooks.Open(filePath);

    //Loop through each worksheet and find pivot tables to add to collection
    foreach (xl.Worksheet ws in wb.Worksheets)
    {
        //Get range of pivot table
        string wsName = ws.Name.ToString();
        xl.Range pivotRange = GetPivotRange(ws);

        //Check if there is any table to add
        if (pivotRange == null) continue;
        DataTable pivotTable = DataTables.FromRange(pivotRange);

        //Get info from range and add to pivot
        pivotCollection.Add(pivotTable);

    }

    return pivotCollection;

}

//Find Pivot table in worksheet
//CS's Code with slight modification, use worksheet instead of range
public static xl.Range GetPivotRange(xl.Worksheet xlworkSheet)
{
    xl.Range pivotRanges = null;
    xl.PivotTables pivotTables = xlworkSheet.PivotTables();
    int pivotCount = pivotTables.Count;
    for (int i = 1; i <= pivotCount; i++)
    {
        xl.Range tmpRange = xlworkSheet.PivotTables(i).TableRange2;
        if (pivotRanges == null) pivotRanges = tmpRange;
        pivotRanges = tmpRange;
    }
    return pivotRanges;
}
#endregion