Question

求VB代码，，，excel当中对数据的复制粘贴与转置

具体是这样的，比如，12345678910.。。。。这样一列数据，我需要将1，2，3，4，5，6，7，8，9，10，11，12，13，14这14行数变成一行，放到新建一个表中的第一行，接下来将8，9，10,11,12,13,14,15,16,17,18,19,20,21这14个数放到刚刚那个新建的工作表中的第二行，以此类推。。。怎么弄呢？其实就是复制粘贴与转置~~~！！大神！~谢谢~~~
我有大量的数据，r而且我是每隔7行就复制14行数据~~所以需要用VB宏~~

Answer 1

这个不用VB，比如你的数据在SHEET1的A列，那你在SHEET2的A1输入=OFFSET(sheet1!$A$1,COLUMN(A1)+ROW()*14-15,)向右向下填充。

那就在A1输入=OFFSET(sheet1!$A$1,COLUMN(A1)+ROW()*7-8,)向右填充14列再向下填充就行。

Answer 2

用两个循环完成