然后确定需要sqlplus 导出表数据哪个表的数据为Excel

来源：蜘蛛抓取(WebSpider) 时间：2017-11-14 11:53 标签： sqlserver导出表数据
查看:52618|回复：12
高级工程师
一个Excel文件有多个工作表，现在要将每个工作表单独保存为一个文件。
该怎么操作最好？
本帖最后由 Nico_Lv 于
17:27 编辑
可以按以下方法操作：
1、右键想要保存为新工作簿的工作表，选择“移动或复制”
2、在“工作簿”下拉菜单选择“新工作簿”
(31.81 KB)
3、选择确定之后，成功将“Sheet2”创建到新的工作簿（原工作簿将不再有Sheet2)，如下：
(23.39 KB)
～Near.~一个人，要是不逼自己一把，根本不知道自己有多优秀
高级工程师
这个方法也非常麻烦，需要先建立新的Excel文件。
有没有什么命令和第三方工具能够实现这个功能：
一个Excel文件中的各个工作表能够自动保存为单独的Excel文件。
高级工程师
这个问题已经基本解决，我在网上找到了解决方法。
右键任意一个工作表标签，在弹出的下拉列表中选择查看代码。即弹出代码窗口。
点击菜单插入-模块 在弹出的模块对话框中 输入以下代码：
& &Private Sub 分拆工作表()
& && & Dim sht As Worksheet
& && & Dim MyBook As Workbook
& && & Set MyBook = ActiveWorkbook
& && & For Each sht In MyBook.Sheets
& && && &&&sht.Copy
& && && &&&ActiveWorkbook.SaveAs Filename:=MyBook.Path & &\& & sht.Name, FileFormat:=xlNormal& &&&'将工作簿另存为EXCEL默认格式
& && && &&&ActiveWorkbook.Close
& && & Next
& && & MsgBox &文件已经被分拆完毕!&
& &End Sub
单击运行-运行子过程|窗体 几秒过后 弹出提示窗口“文件已被拆分完毕”
但是，拆分成为单独的Excel工作簿文件是Excel2003的xls格式，代码如何改进才能够让拆分成为单独的Excel工作簿文件是Excel2007的xlsx格式？
我来回答上面这位朋友的问题，如果希望拆分为Excel的xlsx格式，请将“xlNormal”修改为“xlOpenXMLWorkbook”即可。
引用:原帖由 tangyong_delphi 于
18:06 发表
这个方法也非常麻烦，需要先建立新的Excel文件。
有没有什么命令和第三方工具能够实现这个功能：
一个Excel文件中的各个工作表能够自动保存为单独的Excel文件。 ... 是啊，这个只是针对单个工作簿，而且不是经常操作的一个动作，有些动作还是需要通过VBA解决
～Near.~一个人，要是不逼自己一把，根本不知道自己有多优秀
高级工程师
十分感谢各位高手的指点，但现在碰到了新的问题。
我发现如果Excel工作簿的名字中含有“.”，拆分后的Excel文件就没有文件扩展名。虽然我可以通过DOS命令Rename进行批量增加修改文件扩展名，但我还是希望VBA代码能够解决掉这个问题。
引用:原帖由 tangyong_delphi 于
12:06 发表
十分感谢各位高手的指点，但现在碰到了新的问题。
我发现如果Excel工作簿的名字中含有“.”，拆分后的Excel文件就没有文件扩展名。虽然我可以通过DOS命令Rename进行批量增加修改文件扩展名，但我还是希望VBA代码能够解决掉 ... 你可以在命名的时候把扩展名加上，就是在sht.Name后加上 & &.xlsx&& &&&你试试吧，注意&前后各有个空格
高级工程师
感谢各位高手的指点，问题完美解决！
用工具软件啊，超简单。
教程见百度经验：仅用三步将Excel文件按工作表分割为单独文件，
软件下载见：
工具有问题，最后一个表无法拆分出来了，希望改进
51CTO学院讲师
将一个工作簿文件分发成不同工作簿文件，用sheet的名称命名新的excel工作簿
Sub SaveAllSheet()
Dim TPathAsString, XSheet As Worksheet
TPath =ActiveWorkbook.Path
Application.ScreenUpdating= False
For EachXSheetInActiveWorkbook.Sheets
XSheet.Copy
ActiveWorkbook.SaveAsFilename:=TPath& &\& &ActiveSheet.Name& &.xls&
ActiveWindow.Close
Application.ScreenUpdating= True
确实很实用，刚才用了一下，棒~~要不还得一个一个复制拆分多麻烦。查看: 2893|回复: 9
在线等第一个表填写后，点保存后，第二表自动汇总数据的表格
阅读权限20
在线时间 小时
在线等第一个表填写后，点保存后，第二表自动汇总数据的表格
意思就是我在第一个表格中填完数据后，然后自动依次保存到第二个表中。然后又可以重新填写的那种。可以发样板，本人是菜鸟，需要祥细制作教程，请各位高手帮帮忙，小弟不胜感谢。。。。。。。
阅读权限20
在线时间 小时
高手帮忙呀
::'( ::'( ::'( ::'( ::'( ::'( ::'( ::'(
阅读权限90
在线时间 小时
什么信息也不给，就叫人帮忙！唉！自己想要什么样，模拟一下不是对你更有帮助，虽然我手里有你要的类似的东西，但是……
阅读权限70
在线时间 小时
做一个宏按钮，数据输入后，点击按钮，宏执行保存和数据透视表刷新两个动作。
呃，没有看清下面的要求。这只是不清楚记录的做法。
[ 本帖最后由 wangd111 于
07:11 编辑 ]
阅读权限20
在线时间 小时
再次发附见，需高手帮忙~~~~~~~~````
数据录在表二中，录完后，点一个按钮，就自动录到表三中，是不是要用用VBA，附见已上传。。。。
15:36 上传
点击文件名下载附件
24.5 KB, 下载次数: 83
阅读权限20
在线时间 小时
做一个宏按钮，数据输入后，点击按钮，宏执行保存和数据透视表刷新两个动作。
呃，没有看清下面的要求。这只是不清楚记录的做法。
我就是想要这样的效果，我就是不懂，我之前开到有的公司也是这样做和开票系统~~~~~~~~~~~~~~~~~~~````
阅读权限20
在线时间 小时
“什么信息也不给，就叫人帮忙！唉！自己想要什么样，模拟一下不是对你更有帮助，虽然我手里有你要的类似的东西，但是……附见在5楼附见在5楼附见在5楼附见在5楼附见在5楼附见在5楼附见在5楼附见在5楼附见在5楼附见在5楼
阅读权限10
在线时间 小时
我也想知道怎么操作才能实现。
阅读权限20
在线时间 小时
得用VBA或者宏实现吧，
阅读权限20
在线时间 小时
可以用记录单来实现也可以，不知道能否完成任务
最新热点 /1
ExcelHome每周都有线上直播公开课，
国内一流讲师真身分享，高手贴身答疑，
赶不上直播还能看录像，
关键居然是免费的！
厚木哥们都已经这么努力了，
你还好意思说学不好Office。
玩命加载中，请稍候
玩命加载中，请稍候
Powered by
本论坛言论纯属发表者个人意见，任何违反国家相关法律的言论，本站将协助国家相关部门追究发言者责任！ & & 本站特聘法律顾问：徐怀玉律师 李志群律师所有回答(6)
150万的数据全部导到一个excel估计打开都会很费劲，多导几个文件，再不也要多导几个sheet。
园豆：1888
excel最大行数，不同版本有所不同。
　Excel2003版最大行数是65536行。Excel2007开始的版本最大行数是1048576行。
　　Excel2003的最大列数是256列，2007以上版本是16384列。
　　激活a1单元格，按CTRL+SHIFT+右箭头，选择1行所有单元格，输入=COLUMN()，按ctrl+enter填充，鼠标移到1行最后一个单元格，看到的数字就是Excel当前版本的最大列数。
　　excel最大行列数总结：在 Excel 2010 和 Excel 2007 中，工作表的大小为 16,384 列 & 1,048,576 行，在 Excel 97-2003 中，工作表的大小为 256 列 & 65,536 行。在 Excel 中，超出最大行列数单元格中的数据将会丢失。
园豆：25573
园豆：25573
园豆：13500
导出到excel的方法，我想你是懂的吧？如果不懂，或者你觉得方案不好，应该提导出到excel的优化方案。此处不赘述。
至于150万，是否这个才是关键？
excel的sheet的数据最大记录有限制（你大叔已经有描述，不赘述），明显你的150万是不可能的。
1、优化导出到excel的方案
2、对数据进行分类，每个大类一个文件夹或文件命名方式
3、再分小类，每个小类一个xlsx文件
4、对分类下的数据再分类（比如按日期）分sheet
5、导出数据
至于你大叔的开骂，那确实，别理他，他就一粗人~~~但是呢，你还真的值得你大叔开骂。
大家没义务去帮你解决问题，那是要死脑细胞的。但你有问题总要解决吧？对，要解决问题！
那怎么办？把你遇到的问题细化，比如这个方案的大体策略，存在什么的缺点，希望达到怎么样的效果等等，咱（咱也算你大叔的大叔吧）才好有的放矢啊，要不，有尸米也不能乱拉，对不？
园豆：5714
150W行导出成数据有多大?至少几百M了吧,你http直接下载几百M的东西,你们的服务器这么强?
园豆：24033
这事我还真干过...
说说我的做法：（整体采用队列实现，所以导出不是及时性的，具体操作就是：客户发起导出任务，过段时间，自己来下载。）
1、利用DataReader写文本文件（csv）；
2、利用Excel组件，转换csv到Excel格式并提供现在
园豆：34877
园豆：25573
园豆：34877
&&&您需要以后才能回答，未注册用户请先。

我要回帖

更多关于 sqlserver导出表数据 的文章

 

随机推荐