Cómo abrir un archivo de excel desde un form??

So?ra
17 de Octubre del 2003
Hola!
Mi preguntas es esta:

Tengo un form en el que puse un botón que al pularlo debe abrir un archivo que se llama Formato de Pedidos y que está en excel, pero cómo lo hago?? Cuál es el código que tengo que poner en el botón?? Tengo que habilitar algunas herramientas??

Porfa me urge!! Gracias :)

Libardo D?
17 de Octubre del 2003
Cariño espero y te sirva esto

'Set objWB = Nothing
Set loExcel = CreateObject("Excel.Application")
' Añadimos un libro ...
Set libro = loExcel.Workbooks.Open(App.Path & "modelovar1.xls")
' No permito que se vea Excel...
loExcel.Visible = True 'loExcel.Visible = False para que no
se vea

Esto te vá a funcionar chao!

oFrance
17 de Octubre del 2003
Dim xlapp As Excel.Application
Dim xlbk As Excel.Workbook
Dim xlsht As Excel.Worksheet

Set xlapp = CreateObject("excel.application")
Set xlbk = xlapp.Workbooks.Open("C:\nombreDeDocumento.xls")
Set xlsht = xlbk.Worksheets(1)

Set rs = Adodc2.Recordset
rs.MoveFirst

mLinea = 5 \'esta el # de tu linea en Excel

Do While Not xlsht.Cells(mLinea, 2) = "" \'esto es tu linea excel y tu columna 2

NumEmp = xlsht.Cells(mrow, 2)

mLinea= mLinea + 1

loop
MsgBox "Press Cancel en el mensaje MS Excel", , "Por Favor."
xlsht.Application.Quit
Set xlsht = Nothing
Set xlbk = Nothing
Set xlapp = Nothing

MsgBox "Empleados tranferidos al systema VB"


Tienes que agragar una libreria " Microsoft Excel Library"

ciao