将列复制到Excelmacros中的列表

如何编写一个macros将列复制到列表中,并在其中插入一些单词? 如下所示:

约翰·多伊1256 856
 Jane Doe 5462 564
汤姆·...

 John Doe
字
字
字
字
 1256
字
字
 856
 Jane Doe
字
字
字
字
字
 5462
字
字
 564
汤姆.....

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

Excelmacros的黄金法则是打开macros录制器,执行你想要自动化的动作两三次,然后看看录制的macros。

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

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