在d盘创建一个txt文本文件,名字是fenshu。并在文本文件里面写入分数以英文格式的逗号“,”隔开。如87,76,46,99,100,63创建好之后就可以运行这段代码了。不过不明白的是你是要只统计59分的还是59分及以下,99分那个也是的。我下面写的是包括统计59分及以下的,如果是只统计某一个数,就和100分的那个是一样的。dim m,a(6) as integeropen "d:\f...
1楼所述,vlookup就能搞定 如果强行要用vba的话,代码也不会很多的 翻译按钮 'a列一番下 dim maxline as long maxline=cells(rows.count,1).end(xlup).row '検索缲り返し dim i as long for i=3 to maxline if trim(cells(i,1))<>""and trim(cells(i,3...