Visual Basic - PRegunta2

Life is soft - evento anual de software empresarial
 
Vista:

PRegunta2

Publicado por Mauricio Asprilla (4 intervenciones) el 14/06/2007 15:19:24
Es que lo que yo busco, es que el combobox, no me muestre los archivos de excel que hay en una carpeta, lo que yo realmente busco, es que el combobox, me muestre las hojas de cálculo que hay dentro de un archivo de excel específico, si alguien me puede ayudar, se lo agradecería.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:PRegunta3

Publicado por ivan (1039 intervenciones) el 14/06/2007 15:31:26
¿Eres subnormal o qué?
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:PRegunta2

Publicado por Ayudante (62 intervenciones) el 14/06/2007 18:04:48
A ver si este procedimiento es lo que necesitas.
Debes agregar a tu proyecto la referencia a Excel ("Microsoft Excel 10.0 Object library", o la que tengas).

Sub LeerHojas()
Dim appExcel As New Excel.Application, wbLibro As Workbook, inHoja As Integer

Combo1.Clear
Set wbLibro = appExcel.Workbooks.Open("D:\Libro.xls") ' Tu archivo.
For inHoja = 1 To wbLibro.Worksheets.Count
Combo1.AddItem wbLibro.Worksheets(inHoja).Name
Next
End Sub

Ojalá te sirva
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar