1、r0 = 1改成r0 = 2，想从第几行开始就改成几。2、Cells(r, c).Value = Cells(r, c0).Value后面加一句Cells(r, c0).ClearContents
r0 = 1改成r0 = 2，想从第几行开始就改成几。2、Cells(r, c).Value = Cells(r, c0).Value后面
