将列复制到Excel宏中的列表

时间:2010-02-19 22:20:47

标签: excel-vba excel vba

如何编写将列复制到列表中并在其间插入一些单词的宏?如下:

John Doe            1256            856
Jane Doe            5462            564
Tom...

变为

John Doe
word
word
word
word
1256
word
word
856
Jane Doe
word
word
word
word
word
5462
word
word
564
Tom.....

这个词是不变的,因为它在数据之间是固定的次数(在这个例子中是4和2)。我需要大约300列来将数据从列表中删除。

1 个答案:

答案 0 :(得分:7)

Excel宏的黄金法则是打开宏录制器,执行自动两到三次的操作,然后查看录制的宏。

您通常只需要用处理所有数据的ForWhile循环替换三个单独的操作。

啊,如果您想在Excel中的不同工作表之间切换(例如,因为您将源数据放在一个工作表中,并希望将结果存储在第二个工作表中),请记住将Application.Screenupdating设置为在进入循环之前False,在完成循环之后True,这将加快执行时间。