Convertir rango de datos Excel a Tabla OLE

HMG en Español

Moderator: Rathinagiri

Post Reply
jparada
Posts: 430
Joined: Fri Jan 23, 2009 5:18 pm

Convertir rango de datos Excel a Tabla OLE

Post by jparada »

Hola,

Estoy buscando cómo abrir un archivo Excel y convertir el rango de datos en tabla, alguien que pueda proporcionar un ejemplo.

Me refiero a tabla de Excel no a tabla dbf.

Saludos,
Javier
User avatar
mol
Posts: 3728
Joined: Thu Sep 11, 2008 5:31 am
Location: Myszków, Poland
Contact:

Re: Convertir rango de datos Excel a Tabla OLE

Post by mol »

jparada wrote: Fri Nov 05, 2021 6:00 pm Hola,

Estoy buscando cómo abrir un archivo Excel y convertir el rango de datos en tabla, alguien que pueda proporcionar un ejemplo.

Me refiero a tabla de Excel no a tabla dbf.

Saludos,
Javier
I'm out of home, but tomorrow evening I can send you my translator from xlsx to Epp (pure text) format
User avatar
apais
Posts: 440
Joined: Fri Aug 01, 2008 6:03 pm
DBs Used: DBF
Location: uruguay
Contact:

Re: Convertir rango de datos Excel a Tabla OLE

Post by apais »

You can read your excel file using ODBC like a real DB.
Angel Pais
Web Apps consultant/architect/developer.
User avatar
andyglezl
Posts: 1461
Joined: Fri Oct 26, 2012 7:58 pm
Location: Guadalajara Jalisco, MX
Contact:

Re: Convertir rango de datos Excel a Tabla OLE

Post by andyglezl »

jparada wrote: Fri Nov 05, 2021 6:00 pm Hola,

Estoy buscando cómo abrir un archivo Excel y convertir el rango de datos en tabla, alguien que pueda proporcionar un ejemplo.

Me refiero a tabla de Excel no a tabla dbf.

Saludos,
Javier
Maybe this...

https://www.hmgforum.com/viewtopic.php?p=59538#p59538
Andrés González López
Desde Guadalajara, Jalisco. México.
jparada
Posts: 430
Joined: Fri Jan 23, 2009 5:18 pm

Re: Convertir rango de datos Excel a Tabla OLE

Post by jparada »

Gracias por sus respuesta, pero como comenté estaba buscando la forma de convertir un rango de datos a una tabla (no dbf).

Esto funciona:

Code: Select all

*-- Convert Range to Table and Apply Table Style
oSheet:ListObjects:Add( xlSrcRange, oSheet:Range (lcRange ),, xlYes ):Name = 'tblSku'
oSheet:ListObjects( 'tblSku' ):TableStyle = 'TableStyleMedium15'
Saludos,
Javier
Post Reply