如何用VB对同一目录下的多个EXCEL进行相同操作?

如何用VB对同一目录下的多个EXCEL进行相同操作?
需要对同一个目录下(D:\01文件夹）的多个EXCEL进行相同的操作,由于工作量大,因此想找个简单的方法,请哪位高手指点下,这里谢过了! 
具体做法是：
1.选中每个表的A45下拉到A46，（就是复制A45然后粘贴到A46中）
2.选中A46---CL46，下拉一行到A47--CL47
3.选中从A50行到--A60行，复制到A51行到A61行
我想用代码在不打开这个目录下的excell工作薄来进行一次性操作,但不知道如何写,请高手指点下。
这里高手如云，拜托！ 做个循环就可以了啊。你至少自己先做一个，再循环不就完成了。 一次打开30个工作薄用循环的宏处理我会，但是这样的话也要20次才能完成，而且时间上慢死了 不打开没有办法读取数据啊
我觉得可以用隐藏打开，就是不显示打开的excel

引用 2 楼 wearefr 的回复:

一次打开30个工作薄用循环的宏处理我会，但是这样的话也要20次才能完成，而且时间上慢死了

for i=1 to 几个工作簿
   for j=1 to 几个Row          
      for k=1 to 几个Col
         .........
         .........
     Next k
   Next j
Next i 

转眼之间就可完成，除非你有几百个工作簿 除非你的机子是老爷机, 不然不会久等的。。。。

补充：VB ,  VBA