如何将一个EXCEL文件分成多个文件？
一个EXCEL文件中包含sheet1,sheet2,sheet3等多个工作薄，如何将他们分成多个EXCEL文件，每个文件中只有一个工作薄，分开后的文件以原工作薄的名称命名就可以了，最好是一个简单的公式，对于每个类似的表都适用，而不用每次都要设置。
09-05-13 &
仍然用response.setContentType(&application/vnd.ms-excel&) ，后面看你原来是用什么方式输出的，比如XML方式的，稍加修改就可以了。你打开一个EXCEL文件，选择另存为XML格式，现在这个XML文件可以用记事本打开，最后把文件的扩展名.XML改为.XLS，就可以双击在EXCEL里面打开。你的JSP输出的内容，按照前面XML的格式输出你的内容，浏览器上就会下载一个EXCEL可以打开的文件，什么格式都可以实现。补充：这个帖子实在说不下呀。我过两天内在我空间发表一篇用PHP生成EXCEL的文件的文章吧。你的JSP只输出文本吧，但是你用记事本打开一个EXCEL看一看，开头是什么“刑唷”的东西，然后完全是乱码，你的JSP怎么才能生成这些乱码呢？我估计你尽管用了response.setContentType(&application/vnd.ms-excel&)，实际上是输出的还是HTML代码，我只能估计，因为第一次就问你，你没有补充这个关键内容，却让我猜，还很着急的样子。如果你用输出的内容用的HTML，用了一个ms-excel的头，实际上只是让EXCEL强制把你的内容理解为EXCEL工作表，当然是不可能实现多个工作表的。我已经告诉你了，应该用XML，方法是用EXCEL新建立一个文件，简单输入少数内容，你保存为XML格式，你就可以用记事本打开这个XML文件查看内容，而且也可以修改为.XLS文件让EXCEL直接打开。这种方式和上面的HTML一样，也是挂羊头卖狗肉，但是这样羊头样子逼真一点，可以实现多个工作表。你自己也不去实践一下，我贴个EXCEL内容上来也是乱七八糟的呀。
请登录后再发表评论!
如果真的需要分成几十个文件，可以试用一个工具“ Excel Data Helper(Excel数据助手)”，用它的拆分功能，但拆分前，要添加一列作为拆分条件，该列即为即将保存的文件名。
请登录后再发表评论!微信扫一扫
分享到朋友圈
社会化媒体
了解更多>>
桂ICP备 号
桂公网安备 36号
阅读下一篇
Hi，在你登录以后，就可以永久免费的收藏任何您感兴趣的内容，关注感兴趣的作者！
请输入正确的邮箱
已有帐号请点击
帐号创建成功！
我们刚刚给你发送了一封验证邮件
请在48小时内查收邮件,并按照提示验证邮箱
感谢你对微口网的信任与支持
如果你没有收到邮件，请留意垃圾箱 或 重新发送
你输入的邮箱还未注册
还没有帐号请点击
你输入的邮箱还未注册
又想起来了？
邮件发送成功！
我们刚刚给你发送了一封邮件
请在5分钟内查收邮件,并按照提示重置密码
感谢你对微口网的信任与支持
如果你没有收到邮件，请留意垃圾箱 或 重新发送
对不起，你的帐号尚未验证
如果你没有收到邮件，请留意垃圾箱 或
意见与建议
请留下您的联系方式
* 留下您正确的联系方式，以便工作人员尽快与你取得联系扫二维码下载作业帮
2亿+学生的选择
下载作业帮安装包
扫二维码下载作业帮
2亿+学生的选择
excel中 如何将大量的数据,自动均等的分成几个表!比如1到100 一张表 100-200一张表
扫二维码下载作业帮
2亿+学生的选择
肯定是为了任务分解用了.要分表不难,可以使用宏来实现.占个坑,一会把代码发上来. 按ALT+F11,双击左侧这个文件名,双击当前工作表名,然后在右侧粘贴以下代码.然后到工作表界面运行aa宏Sub aa()Dim newbook As Workbooka = ThisWorkbook.Nameb = ActiveSheet.Nameh = InputBox("请输入行数")Application.ScreenUpdating = FalseFor n = 0 To Range("a65536").End(xlUp).Row \ hWindows(a).ActivateSheets(b).ActivateRows((h * n + 1) & ":" & (h * n + h)).CopySet newbook = Workbooks.AddWith newbooknewbook.ActivateActiveSheet.Paste.SaveAs Filename:=ThisWorkbook.Path & "\" & Replace(a, ".xls", "") & n & ".xls".CloseEnd WithNext nApplication.ScreenUpdating = TrueEnd Sub运行时会提示你输入行数,比如100,确定后就会自动拆成100行一个表,并加上序号保存为新文件. 有疑问可以追问.
为您推荐：
其他类似问题
扫描下载二维码6404人阅读
Excel（61）
演示动画由ExcelHome论坛微领祝洪忠提供
微博发布地址：
更多精彩内容尽在新浪微博@ExcelHome，欢迎关注。
一句话点评：注意，拆分对象（A1单元）一定要先选中“自动换行”，然后再设定“两端对齐”才能实现该效果
&&相关文章推荐
* 以上用户言论只代表其个人观点，不代表CSDN网站的观点或立场
访问：834552次
积分：9375
积分：9375
排名：第1851名
原创：84篇
转载：537篇
评论：38条
(2)(1)(1)(1)(1)(3)(4)(4)(4)(3)(11)(5)(4)(5)(3)(9)(9)(14)(11)(15)(17)(21)(19)(34)(25)(21)(13)(17)(5)(8)(9)(9)(4)(13)(14)(23)(14)(10)(23)(193)(18)(1)Excel2013表格技巧：把多个单元格内容以符号分隔，显示在一个单元格内
有些时候，我们需要将2013表格里面的文字或者数据提取出来，以符号分隔，显示在一个单元格内，该怎么操作？对于初学者来说，确实不知道从何做起，一时间茫然。本小编就来教大家一种简单的方法实现这个目的。
①启动Excel2013，简单的输入一些数据，便于演示，单击C2单元格，输入： =C2&&;&&& &是连接符的意思。
②此时我们不能按照往常的那样，直接双击填充柄完成余下的数据输入，通过单元格填充，到倒数第二项即可。
③在最后一个单元格里面输入：=C8，回车。
④选中D2：D8区域，按下两次Ctrl+C键复制，然后单击菜单栏--开始里面的剪贴板按钮。
⑤选择E1单元格，双击，进入编辑状态，单击左侧的要粘贴的项目，回车。
⑥这时可以看到数据已经以分好隔开，都显示在E1单元格内，但是还没有结束，点击菜单栏--开始--自动换行按钮。
⑦最终的结果如下图所示：
我的第6步骤做不了啊
最新视频教程
点击：19827&&&评论：3
点击：5662&&&评论：0
点击：9961&&&评论：0
点击：849551&&&评论：56
点击：1088350&&&评论：267
点击：196998&&&评论：34
点击：268223&&&评论：33
点击：157212&&&评论：90}