.NET y Excel

' agrega una referencia(COM) de "Microsoft Excel xx.x
Object Library"

'imports
Imports Excel


Dim miExcel As Excel.Application
Dim miLibro As Excel.Workbook
Dim miHoja As Excel.Worksheet

miExcel = CreateObject("Excel.Application")
miExcel.Workbooks.Open("c:\TuExcel.xls", , False)
miExcel.ScreenUpdating = False
'miExcel.Visible = True
Dim indice As Short

CmbLibros.BeginUpdate()
CmbLibros.Items.Clear()

For indice = 1 To miExcel.Worksheets.Count
CmbLibros.Items.Add(miExcel.Worksheets(indice).Name)
Next
CmbLibros.EndUpdate()

miExcel.Workbooks.Close()
miExcel.Quit()




en este caso cargamos en CmbLibros las hojas del libro.

Saludos
-
Freddy Cáceres
Santiago - Chile

¿Como se pueden obtener los nombres de las hojas que
conforman un archivo de Excel?
Esto porque necesito leer datos desde diferentes archivos
de Excel, pero si un usuario cambió el nombre de alguna(s)
de las hojas mi código falla.
Por lo general se llaman Hoja1, Hoja2, etc o Sheet1, ...
Pero si alguien les cambia el nombre yo tengo que
averiguar como se llaman para poder leer los datos.

GRACIAS
.