系统表格怎么导出excel

1.如何把EXCEL表中导出的表格在还原回?

这是我的回答，希望对你有帮助。

有很多方法都可将数据库中某个表的数据导出到电子表格中，例如通过创建Access。Application，可以利用Access本身的导出功能实现将表中的数据导出到电子表格中。

但是这种方法会占用较多的系统资源，并且缺乏通用性。 如果一个数据库没有导出的功能怎么办？下面的这段程序代码利用记录集实现导出的功能，这种做法的好处是显而易见的：你可以控制要导出的数据，而不用将整个表的内容都导出到电子表格中。

为简单起见下面的程序代码仍将整个表的数据导出到电子表格中。如果你有兴趣的话，对下面的代码稍加改动就可做成更为通用的一个类或是一个控件。

首先在窗体上添加一个标签控件和一个命令按钮，然后在工程中添加对DAO引用。利用下面的程序代码就可将表中的数据导出到电子表格中。

Option ExplicitPrivate Sub Command1_Click()Dim tempDB As DatabaseDim i As Integer ' 循环计数器Dim j As IntegerDim rCount As Long ' 记录的个数Dim xl As Object ' OLE自动化对象Dim Sn As RecordsetScreen。 MousePointer = 11Label1。

Caption = "打开数据库。

"Label1。

RefreshSet tempDB = Workspaces(0)。OpenDatabase("Nwind。

mdb")Label1。Caption = "创建Excel对象。

"Label1。RefreshSet xl = CreateObject("Excel。

Sheet。8")Label1。

Caption = "创建快照型记录集。

"Label1。

RefreshSet Sn = tempDB。OpenRecordset("Customers", dbOpenSnapshot)If Sn。

RecordCount > 0 ThenLabel1。Caption = "将字段名添加到电子表格中"Label1。

RefreshFor i = 0 To Sn。Fields。

Count - 1xl。Worksheets(1)。

cells(1, i + 1)。 Value = Sn(i)。

NameNextSn。MoveLastSn。

MoveFirstrCount = Sn。RecordCount' 在记录中循环i = 0Do While Not Sn。

EOFLabel1。Caption = "Record:" & Str(i + 1) & " of" & _Str(rCount)Label1。

RefreshFor j = 0 To Sn。Fields。

Count - 1' 加每个字段的值加到工作表中If Sn(j)。Type Worksheets(1)。

cells(i + 2, j + 1)。Value = "Memo or Binary Data"End IfNext jSn。

MoveNexti = i + 1Loop' 保存工作表Label1。Caption = "保存文件。

"Label1。Refreshxl。

SaveAs "c:\Customers。XLS"'从内存中删除Excel对象Label1。

Caption = "退出Excel"Label1。Refreshxl。

Application。QuitElse' 没有记录End If' 清除Label1。

Caption = "清除对象"Label1。RefreshSet xl = NothingSet Sn = NothingSet tempDB = NothingScreen。

MousePointer = 0 ' 恢复鼠标指针Label1。 Caption = "Ready"Label1。

Refresh End SubPrivate Sub Form_Load()Label1。AutoSize = TrueLabel1。

Caption = "Ready"Label1。RefreshEnd Sub。

2.东软通用报表系统怎样导出excel文件

久其报表系统中：

（一）导出jio报表数据

1、选择左上角的“传送-数据传出”

2、选择“传出参数或选择数据及测算分析参数”，选择“下一步”

3、选择“单位数据”，如导出全部单位数据可直接点击“下一步” ，如导出个别单位数据，点击“选择单位”

4、选择需导出数据的单位名称，然后“确定”

5、选择数据存放位置

6、完成数据传出

（二）导出excel文档

1、选择左上角的“传送-导出excel文档”

2、选择需要传出数据的单位名称，选择“确定”

3、选择导出文件的存储位置，点击“确定”