房天下

Fang.com
房天下 > 房天下问答 > 业主生活 > 其他

  • excel 统计 数字 次数

    2 3 4 63 4 6 77 3 2 6. . . .. . . .有4列n行数字,要统计出各数字出现的次数将结果用2列表示:数字 次数2 23 34 26 37 2. .. .要求:1)可在任意数据区域对数据进行采集 2)结果可在任意数据区域显示.请老师帮忙,若能用"宏"解决就好了,在这里我先谢谢您了.

    提问者：wyf062721

    发布于2010-11-30

共1个回答
  • ugm小兰 丨Lv 0
    Sub 按钮1_单击() Set myb = CreateObject("scripting.dictionary"): myb("数字") = "次数"Set rng = Application.InputBox("选择要统计的区域:", Type:=8) ActiveSheet.Cells.Interior.ColorIndex = 0 rng.Interior.ColorIndex = 3 For Each rng1 In rng myb(rng1.Value) = Application.WorksheetFunction.CountIf(rng, rng1) Next Set rng3 = Application.InputBox("选择结果输出地:", Type:=8) With rng3 .Resize(myb.Count) = Application.Transpose(myb.keys) .Offset(, 1).Resize(myb.Count) = Application.Transpose(myb.items) End With Set myb = Nothing: Set rng3 = NothingEnd Sub附件：Book1.xls
    +1 2010-11-30 举报
热门人气推荐
推荐楼盘小区二手房商圈租房热门知识 相关推荐房产百科
免责声明：问答内容均来源于互联网用户，房天下对其内容不负责任，如有版权或其他问题可以联系房天下进行删除。