Excel直接导入SQLServer,数据一步到位(excel导入sqlserver)

要将Excel中的数据导入SQLServer,可以采用“直通”的方式,即使Excel中的数据复杂且多变,也无需借助中间介质,而是直接从Excel中将数据导入到SQLServer中。

一、使用普通方式导入

导入方式其实非常简单,只需要知道以下步骤即可:

(1)打开SQLServer工具;

(2)点击“任务”–>“导入数据”–>“Excel”;

(3)选择Excel文件;

(4)点击下一步,确定源数据和目标数据,进行转换;

(5)勾选“完成时创建新表”,点击“完成”完成数据导入。

二、使用VBA宏代码导入

如果用户想自定义数据导入过程,可以使用VBA宏,将表格内容一次性快速导入到SQLServer中。下面以”将Excel文件中每一行的数据导入到SQLServer中”为例,来介绍如何使用VBA宏:

(1)打开Excel文档,在菜单栏中点击“开发”;

(2)点击“插入”,然后点击“模块”;

(3)输入如下宏代码,完成数据导入:

Sub ImportDataToSQLServer()

Dim conn As ADODB.Connection

Dim Recordset As ADODB.Recordset

Dim strDatabase As String

strDatabase = “数据库连接字符串”

Set conn = New ADODB.Connection

conn.Open strDatabase

Set Recordset = conn.Execute(“select * from [sheet1$]”)

Do While Not Recordset.EOF

Call ExecSql(Recordset, conn)

Recordset.MoveNext

Loop

conn.Close

Recordset.Close

Recordset = Nothing

Set conn = Nothing

End Sub

Sub ExecSql(recordSet As Recordset, conn As ADODB.Connection)

Dim strSql As String

strSql = ”Insert Into tableName(变量) Values (‘” & recordSet(0).Value & ”’,’” & _

recordSet(1).Value & ”’,’” & recordSet(2).Value & ”’,’” & recordSet(3).Value & ”’)”

conn.Execute strSql

End Sub

宏代码可以根据用户的实际情况调整,完成数据导入操作。

以上就是使用普通方式和VBA宏进行Excel数据导入SQLServer的方法,选择哪个方式取决于企业实际情况,能满足数据导入要求的就可以使用。


数据运维技术 » Excel直接导入SQLServer,数据一步到位(excel导入sqlserver)