各位大神怎么用VSTO去重复计数啊

klbaob

也就是选取Excel的一列数据，然后去重复得出这一列的个数。怎么做在
VSTO一键得出，每次用Excel复制到别的工作薄再去重复有点麻烦。

klbaob

1. private void btnCountDistinct_Click(object sender, RibbonControlEventArgs e)
   
2.         {
   
3.             Range rng = app.Selection;
   
4.             ArrayList inputs = new ArrayList();
   
5.             int count = 0;
   
6.             try
   
7.             {
   
8.                 foreach (Range cell in rng.Cells)
   
9.                 {
   
10.                     if (cell.Value2 != null)
    
11.                         inputs.Add(cell.Value2);
    
12.                 }
    
13.                 count = service.CountDistinct(inputs);
    
14.                 Clipboard.SetDataObject(count + "", true);
    
15.                 MessageBox.Show("去重复后计数为：" + count.ToString() + " 个,并且已复制到剪切板可直接粘贴。");
    
16.             }
    
17.             catch (Exception ex)
    
18.             {
    
19.                 MessageBox.Show(ex.Message);
    
20.             }
    
21. 
    
22.         }

复制代码

这一段代码效率有点低有没有谁能指点下啊？5W多条数据用时13秒左右

lovemh1987

用list试试

sonic.hu

Range("C:C").RemoveDuplicates （Columns:=1）去重
WorksheetFunction.CountA(ActiveSheet.Range("C:C")) 得到非空列的数量

klbaob

sonic.hu 发表于 2019-11-16 17:29
Range("C:C").RemoveDuplicates （Columns:=1）去重
WorksheetFunction.CountA(ActiveSheet.Range("C:C")) ...

谢谢哈！已经搞定了！！