麻烦VBA高手翻一下

麻烦VBA高手翻一下

一句句翻译没用的，把你excel丢过来执行看看。
没数据你就把第5行数据补上啊，程序要求要5行

你这么懂逻辑你自己弄啊，还补充得这么有理。
谁有空帮你一行行看，有空帮你执行帮看看为什么出错就不错了。