单纯的重复运行的话加个循环就可以：把你的宏代码Sub开头后加入：For Tims=1 to 100End Sub语句前加入：Next即可以循环运行你的宏100次，但是这样单纯的循环往往会造成很大的冗余和错误，特别是引用的数据。建议把你表格式的需求说出来，我愿意花时间给你写。
