利用vsto迅速排除非数据单元格方法？

qsclaw

  用vb写了一个addin，实现鼠标选择excel几行后，vb把数据读到程序中，实现方法如下
xlapp = GetObject(, "excel.application")
        xlbook = xlapp.activeworkbook
        For Each oCell In xlapp.selection

现在只要全选了一行或一列，程序就挂掉，因为整行里面非数据单元格全部被读进去，导致循环数非常大，不停在判断是否非空。大家知道，利用excel自带画散点图等功能时，不管有多少非数据单元格，都能瞬间画完，不知道这个地方需要怎样处理下？

qilongjie

我写过一个循环，用UsedRange，你看看有参考意义不

1. for (int i = 5; i < workSheet.UsedRange.Rows.Count + 1; i++)
   
2.             {
   
3.                 for (int j = 1; j < workSheet.UsedRange.Columns.Count + 1; j++)
   
4.                 {
   
5.                     Excel.Range g = (Excel.Range)workSheet.Cells[i, j];
   
6.                     if (Convert.ToInt32(g.Interior.ColorIndex) == 3)
   
7.                         return false;
   
8.                 }
   
9.             }

复制代码

qsclaw

qilongjie 发表于 2014-3-18 08:55
我写过一个循环，用UsedRange，你看看有参考意义不

非常感谢，我试下哈