将列复制到Excel宏中的列表

Jon*_*Jon 2 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列将数据从列表中删除.

Tre*_*reb 7

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

通常,您只需要更换由三个独立的动作ForWhile 环路处理所有数据.

嗯,如果你想在Excel不同工作表之间进行切换(因为你有你的源数据在一个表,要存储在第二个搜索结果,例如),记得设置Application.ScreenupdatingFalse进入你的循环之前,以及True之后完成循环,这将加快执行时间.