[Cristian Moreno]

Estoy trabajando con VBA y quisiera realizar un Insert desde Excel a una base de datos que está en SQL 2008? Alguien me podría orientar con este punto?

[Felipe35]

Qué versión de Excel estas utilizando?

[Cristian Moreno]

Hola Felipe estoy utilizando la versión 2010

[Felipe35]

Ok, lo puedes hacer entonces con ADO, te dejo un ejemplo:

Dim cn As New ADODB.Connection
strCon = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" _
& ActiveWorkbook.FullName _ & ";Extended Properties=""Excel 8.0;HDR=Yes;IMEX=1"";" cn.Open strCon
s = "INSERT INTO [ODBC;Description=TEST;DRIVER=SQL Server;" _
& "SERVER=Server;Trusted_Connection=Yes;" _
& "DATABASE=test].TablaBD ( Col1, Col2, Col3, Col4 ) " _
& "SELECT a.Col1, a.Col2, a.Col3, a.Col4 " _
& "FROM [Sheet2$] a " _
& "LEFT JOIN [ODBC;Description=TEST;DRIVER=SQL Server;" _
& "SERVER=Server;Trusted_Connection=Yes;" _
& "DATABASE=test].TablaBD b ON a.Col1 = b.Col1 " _
& "WHERE b.Col1 Is Null"

[Cristian Moreno]

Gracias Felipe, me funciono a la perfección