SoloCodigo

Programación General => Visual Basic 6.0 e inferiores => Mensaje iniciado por: MindEye en Lunes 12 de Enero de 2004, 18:56

Título: Como Saber Las Tablas Que Tiene Una Hoja Xls
Publicado por: MindEye en Lunes 12 de Enero de 2004, 18:56

- 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.

Título: Re: Como Saber Las Tablas Que Tiene Una Hoja Xls
Publicado por: Brroz en Martes 13 de Enero de 2004, 09:07

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.