多个Excel文件快速导入到DB里面

Posted 梦想还是要有的,一不小心实现了呢^_^

tags:

篇首语:本文由小常识网(cha138.com)小编为大家整理,主要介绍了多个Excel文件快速导入到DB里面相关的知识,希望对你有一定的参考价值。

1 . 文件比较多,需要把这么多的数据都导入到DB里面,一个个导入太慢了,能想到的是先把数据整个到一个Excel中,然后再导入

 

2. 第一步准备合并Excel,新建一个新的excel,命名为totaldata.xlsx,记得excel2016版本不支持xlsx导入,只支持xls的选择,所以把上面的后缀名统一改为.xls

3.双击打开totaldata.xlsx,Alt+F11,快速打开编辑器,双击"Sheet1",输入如下脚本

Sub 工作薄间工作表合并()

Dim FileOpen
Dim X As Integer
Application.ScreenUpdating = False
FileOpen = Application.GetOpenFilename(FileFilter:="Microsoft Excel文件(*.xls),*.xls", MultiSelect:=True, Title:="合并工作薄名称")
X = 1
While X <= UBound(FileOpen)
Workbooks.Open Filename:=FileOpen(X)
Sheets().Move After:=ThisWorkbook.Sheets(ThisWorkbook.Sheets.Count)
X = X + 1
Wend
ExitHandler:
Application.ScreenUpdating = True
Exit Sub
errhadler:
MsgBox Err.Description
End Sub

4.运行->运行子过程/用户窗体,选择合并的多个excel ,点击确定,就可以看到文件都被整合到一个excel了

 5. 核对下数据,ctrl+S保存

 

 6.导入数据到SqlServerDb中去,打开数据,链接上,选择即将把数据到的DB点中->右击->Tasks->ImportData--->NEXT

 

 7. 选择数据源,这里是Excel文件选择"Microsoft Excel",如果是记事本.txt的话,选择Flat File Source,其他根据情况选择,

点击Browse...选择导入的文件,totaldata.xlsx,然后 Next

 

 8. 选择登陆方式,链接方式ServerName一般"."本地链接,然后Next

9.默认Next->默认Next->

 10.Next->默认完成就好了!

以上是关于多个Excel文件快速导入到DB里面的主要内容,如果未能解决你的问题,请参考以下文章

从多个TXt文件导入数据到excel中,如何修改VBA代码,选取不同的文件

把excel的表格内容填充到docx模板里面

jsp导入excel到DB的问题

DB导入数据到EXCEL,修改了怎么转换成DB?

从Excel向MATLAB中导入数据出现了nan怎么处理

如何用java导入Excel数据到数据库?