Question

vb编程如何保存100个excel文件并且命名1.xls以此类推2.xls。。。。。100.xl

，用VB编程，不要用VBA

Answer 1

1，你的VB版本？
2，是新建一个文件还是打开一个文件，并保存为100个相同内容的文件吗？

追问

我的问题是我新建一个叫模板文件的excel文件，用VB编程把一张excel表的某一列填入模板的第一行和第一列单元格中

追答

dim i as integer
for i=1 to 100
ActiveWorkbook.SaveAs Filename:="c:\" & Cstr(i) & ".xls"
next i

追问

可以具体一点吗？比如我要如图所示里的五户姓名和身份证号码提取出来，然后填入到如图所示模板文件中，并且把这五户分别保存，保存的文件名是身份证号码.xls。用VB可以写吗？不用VBA，谢谢

就是每一户保存成一个单独的表，保存的名字是身份证号码.xls

如果成功应该是五张表

追答

你们提问是这样来的啊？现在的问题与你原来的问题已经完全不是同一个问题了？
先回答我的提问？
1，你的VB的版本？
2，你的EXCEL的版本？

追问

VB6.0版本，excel2003版本的

追答

我刚刚回答一个类似问题，你到这里去看：

http://zhidao.baidu.com/question/1693447450184859908

追问

你这里写的程序我都懂呀！你只是针对一个表呀的操作呀！你可以帮我把我这个问题写一个具体的代码呀！谢谢啦！

追答

打开两个文件的操作：
MyBook1.Sheets("表1").Cells(2,3).Value = MyBook2.Sheets("表2").Cells(5,6).Value
把 MyBook2.Sheets("表2")的第5行、第6列单元格的数据 赋给 MyBook1.Sheets("表1")的第2行、第3列的单元格。
一切可以解决了吧？
再不会，这里就写不了这么多了，你找到我的主页，通过那里的联系方式联系我吧。

追问

真不会，你这个我懂，没用，不具体。关键是你怎么把这五户分别保存呀！算了，感谢你，我自己研究研究吧！