EXCEL中VBA编程问题

不知道你的目的，只能推测 单从代码看这段程序有点问题 1、如果F6是空白的话，只能取6行，这个时候nRow1=7，resize时再减掉1就剩6了 2、如果F6不是空白的话，如果缩水区数据F20下面还有数据的话，就出现nRow1大于20，退出了 3、如果F20后没有数据，取7到20行数据，共计14行，但程序又resize了20行的区域，导致日期会多出4行 如果只是简单的复制没必要这么复杂，直接用copy