[已解决]求助：图表和文字，多次复制的问题

jbh121

有表格，里面有个组合的图文框，有汉字。想根据单元格数值，向下复制N次，很不好处理。
复制的控制.rar (11.13 KB, 下载次数: 29)

2011-7-23 11:32 上传

点击文件名下载附件

最佳答案

月排行榜 / 总排行榜

zjdh

2011-7-23 15:46

这个太简单啦：
Sub TEST()
    For I = 1 To Round(Range("M3") / 2, 0)
        Range("B2:K15").Copy Range("B" & I * 14 + 2)
    Next
End Sub

跳转到最佳答案楼层

zjdh

这个太简单啦：
Sub TEST()
    For I = 1 To Round(Range("M3") / 2, 0)
        Range("B2:K15").Copy Range("B" & I * 14 + 2)
    Next
End Sub

jbh121

呵呵，晕菜了，以为图形要专门控制