在宏里面写excel公式对A列所有数据求和，把和赋值给a，如下写：a=worksheetfunction.sum("a:a") 使用count求个数a=worksheetfunction.count("a:a") 其余类似 提示：数组公式 自行baidu搜索方法
把数据发到cy@nwsuaf.edu.cn,我试试。
20，我帮你写vba，190769219
