• Lunes 23 de Diciembre de 2024, 07:27

Autor Tema:  Como Saber Las Tablas Que Tiene Una Hoja Xls  (Leído 966 veces)

MindEye

  • Miembro MUY activo
  • ***
  • Mensajes: 185
    • Ver Perfil
Como Saber Las Tablas Que Tiene Una Hoja Xls
« en: Lunes 12 de Enero de 2004, 18:56 »
0
- Hola amigos, estoy intentando abrir una hoja de calculo de excel, el problema que tengo es que no consiguo poner en un combo, el nombre de las tablas internas que tiene la hoja para poderme conectar a ellas.

 - Alguien me podria decir como puedo hacerlo.

 - Gracias.

Brroz

  • Miembro de PLATA
  • *****
  • Mensajes: 1058
    • Ver Perfil
Re: Como Saber Las Tablas Que Tiene Una Hoja Xls
« Respuesta #1 en: Martes 13 de Enero de 2004, 09:07 »
0
Hola MindEye.

Si a lo que te refieres es a cómo obtener los nombres de las hojas que contiene un libro excel, podrías utilizar algo así, almacenando los nombres de las hojas en una matriz:

Código: Text
  1.  
  2.     .
  3.     .
  4.     .  
  5.     Dim objAppXls as object
  6.     Dim objWSheets as Object
  7.     Set objAppXls = GetObject("NombreDeLibro.Xls")
  8.     Set objWSheets = objAppXls.Worksheets
  9.     Dim lng1 as lon, strSheets() As String
  10.     Redim strSheets(1 To objWSheets.Count)    
  11.     For lng1 = 1 To objWSheets.Count
  12.         strSheets(lng1) = objWSheets(lng1).Name
  13.     Next lng1
  14.     .
  15.     .
  16.     .
  17.  
  18.  

Suerte.