用宏另存文件时，如何让文件名随源文件？

有数百个网页文件（1.htm, 2.htm, 3.htm...637.htm），格式完全一样，内容不一样。
现需要用word程序对它们逐个进行简单编辑——去掉开头的两排空行，然后另存为文档格式文件（*.doc）。

如此浩繁的工作量，我首选自然是用宏了。我录制了一个宏，内含的主要操作如下：
-按DELETE键 两次
-菜单选择：文件，另存为，doc文件类型，保存，退出。

可实际运行时，出现问题——所有htm文件在另存为doc文件时，都被命名成了相同的文件名——1.doc。
我需要的效果是——另存为的文件名，与源文件名相同，仅扩展名不同。比如：1.htm被另存为1.doc；2.htm被另存为2.doc...

请问该如何编辑宏，才能实现？
谢谢。

那楼主自己录制的宏代码呢？