exportar de excel a access (porrrrrsupuesto con VB)

31/05/2006 - 11:53 por xabi | Informe spam
Buenas!!!
Aqui sigo pegandome con el Visual.Lo que intento hacer aora es exportar
una tabla de Excel a Access.Anteriormente he comprobado que los campos estan
en el orden adecuado(menos una columna en la tabla access llamanada id para
identificar cada grupo nuevo que importo)
Es decir:
tabla access
id lote sublote denominacion
tabla excel
lote sublote denominacion

Lo que quiero aora es rellenar mi tabla de acces con los datos que el
usuario a matido en el EXCEL.He encontrado varias maneras pero no se si sera
cosa de la configuracion de la conexion pero no hace nada.La que mas me
atraia era la de INSERT INTO tabla access IN ruta SELECT * FROM Hoja1$
pero no he conseguido nada.Mi ruta la tengo en una variable que se llama
NombreArchivo.Trabajo con un projecto de access(*.adp).
Alguien sabe como hacer esto?
Mi conexio al EXCEL es esta:
With cnn
.Provider = "Microsoft.Jet.OLEDB.4.0"
.ConnectionString = "Data Source = " + NombreArchivo
.Properties("Extended Properties") = "Excel 8.0;HDR=Yes"
.Open
End With

lo hago al principio del projecto visual y no la vuelvo a cambiar...le falta
algo para poder hacer la exportacion?
muchisimas gracias como siempre!!!
:):)

Preguntas similare

Leer las respuestas

#21 xabi
02/06/2006 - 13:20 | Informe spam
y donde andas aora?
Respuesta Responder a este mensaje
#22 SoftJaén
02/06/2006 - 15:36 | Informe spam
"xabi" escribió:

la sentencia INSERT INTO no me va...
Deberia de ser INSERT INTO hdi_reducido(campo1,campo2)
VALUES(valor1,valor2...) algo asi verdad?




Sería así si solamente vas a añadir un único registro. Pero lo normal en
estos casos, es que ejecutes una inserción masiva de registros. Si deseas
añadir a la tabla, todos los registros existentes en la hoja de Excel,
ejecuta la siguiente consulta:

sql = "INSERT INTO hdi_reducido " & _
"IN ''[ODBC;Driver={SQL Server};" & _
"Server=ALEB2B;" & _
"Database=master;" & _
"UID=sa;" & _
"PWD=manager] " & _
"SELECT * FROM [Hoja1$]"

Si deseas conocer la sintaxis del lenguaje SQL del motor Microsoft Jet, en
el siguiente enlace encontrarás un breve manual de primeros auxilios:

Manual del lenguaje SQL del motor Microsoft Jet versión 4.0
http://mvp-access.com/softjaen/manu.../index.htm

Enrique Martínez
[MS MVP - VB]

Nota informativa: La información contenida en este mensaje, así como el
código fuente incluido en el mismo, se proporciona «COMO ESTÁ», sin
garantías de ninguna clase, y no otorga derecho alguno. Usted asume
cualquier riesgo al poner en práctica, utilizar o ejecutar lo recomendado o
sugerido en el presente mensaje.
Respuesta Responder a este mensaje
#23 SoftJaén
02/06/2006 - 15:39 | Informe spam
"xabi" preguntó:

como le indico que me inserte en un campo el valor de una
variable? Se usa & cierto? Pero va entre comillas o algo?




Como ya te indiqué en otro correo, para concatenar cadenas alfanuméricas se
utiliza el signo &. Ahora bien, sólo deberás encerrar entre comillas simples
los campos de texto:

"... VALUES (" & variableNumérica & ", '" & variableTexto & "')"

Enrique Martínez
[MS MVP - VB]

Nota informativa: La información contenida en este mensaje, así como el
código fuente incluido en el mismo, se proporciona «COMO ESTÁ», sin
garantías de ninguna clase, y no otorga derecho alguno. Usted asume
cualquier riesgo al poner en práctica, utilizar o ejecutar lo recomendado o
sugerido en el presente mensaje.
Respuesta Responder a este mensaje
#24 Eva
02/06/2006 - 16:33 | Informe spam
Sigo por la Euskadi profunda :) aunque no tanto

"xabi" escribió en el mensaje
news:
y donde andas aora?


Respuesta Responder a este mensaje
#25 xabi
05/06/2006 - 09:49 | Informe spam
muchisimas gracias,va perfecto,vamos haber si con esto ya queda todo
encarrilado... :)
muchisimas gracias a todos como siempre,,, :)
"SoftJaén" escribió en el mensaje
news:un%
"xabi" escribió:

> la sentencia INSERT INTO no me va...
> Deberia de ser INSERT INTO hdi_reducido(campo1,campo2)
> VALUES(valor1,valor2...) algo asi verdad?
>

Sería así si solamente vas a añadir un único registro. Pero lo normal en
estos casos, es que ejecutes una inserción masiva de registros. Si deseas
añadir a la tabla, todos los registros existentes en la hoja de Excel,
ejecuta la siguiente consulta:

sql = "INSERT INTO hdi_reducido " & _
"IN ''[ODBC;Driver={SQL Server};" & _
"Server=ALEB2B;" & _
"Database=master;" & _
"UID=sa;" & _
"PWD=manager] " & _
"SELECT * FROM [Hoja1$]"

Si deseas conocer la sintaxis del lenguaje SQL del motor Microsoft Jet, en
el siguiente enlace encontrarás un breve manual de primeros auxilios:

Manual del lenguaje SQL del motor Microsoft Jet versión 4.0
http://mvp-access.com/softjaen/manu.../index.htm

Enrique Martínez
[MS MVP - VB]

Nota informativa: La información contenida en este mensaje, así como el
código fuente incluido en el mismo, se proporciona «COMO ESTÁ», sin
garantías de ninguna clase, y no otorga derecho alguno. Usted asume
cualquier riesgo al poner en práctica, utilizar o ejecutar lo recomendado


o
sugerido en el presente mensaje.


Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaSiguiente AnteriorRespuesta Tengo una respuesta
Search Busqueda sugerida