Como abro un archivo de excel desde visual Basic
Tengo un pequeño problema, quiero abrir un archivo de excel desde un botón en Vusual Basic el código que tengo es el siguiente
Call Shell("C:\Archivos de programa\Microsoft Office\Office12\EXCEL.exe D:\Cheques.XLS", vbMaximizedFocus)
Y no se donde esta el error ya que me dice que no se encuentra el archivo o que esta mal escrito y si le quito la opción de D:\Cheques.XLS" solo me abre el programa de excel, me podrías ayudar
de antemano
Call Shell("C:\Archivos de programa\Microsoft Office\Office12\EXCEL.exe D:\Cheques.XLS", vbMaximizedFocus)
Y no se donde esta el error ya que me dice que no se encuentra el archivo o que esta mal escrito y si le quito la opción de D:\Cheques.XLS" solo me abre el programa de excel, me podrías ayudar
de antemano
1 respuesta
Respuesta de Carlo Navarro Rojas
1
Haber si te entendí... porque creo tener dos respuestas entonces
La primera...
Si quieres abrir un archivo de excel y que ejecute en excel pues solo usa la función shell..
Shell ("c:\libro1.xls")
Segunda opción...
Si lo que quieres es abrir el archivo y leer el contenido en vb realiza lo siguiente...
1.- Establece las referenicas que vb pide aquí te digo cuales
ve a proyecto>>>referencias...
Después habilita las siguientes opciones
Microsoft Excel 11.0 Object library
***en el caso del office 2003 esa es la referencia.. para office anteriores solo cambia el numero de la libreria***
despues pon en tu forma un boton y un text y luego copia y pega este codigo
'establecemos un nombre a el archivo
archivo_incoming = "C:\libro1.xls"
'creamos una apliacacion deexcel
Set x = CreateObject("Excel.application")
'nos conectamos con el archivo y lo abrimosen segundo plano
With x
.Workbooks.Open FileName:=archivo_incoming
'leeemos el contenido de la celda A1
text1=worksheets(1).cell(1,1)
'quitamos la aplicacion
.Application.Quit
End With
'liberamos de la memoria el archivo
Set x = Nothing
Saludos te recomiendo la segunda opción que es la que más utilizo
suerte
La primera...
Si quieres abrir un archivo de excel y que ejecute en excel pues solo usa la función shell..
Shell ("c:\libro1.xls")
Segunda opción...
Si lo que quieres es abrir el archivo y leer el contenido en vb realiza lo siguiente...
1.- Establece las referenicas que vb pide aquí te digo cuales
ve a proyecto>>>referencias...
Después habilita las siguientes opciones
Microsoft Excel 11.0 Object library
***en el caso del office 2003 esa es la referencia.. para office anteriores solo cambia el numero de la libreria***
despues pon en tu forma un boton y un text y luego copia y pega este codigo
'establecemos un nombre a el archivo
archivo_incoming = "C:\libro1.xls"
'creamos una apliacacion deexcel
Set x = CreateObject("Excel.application")
'nos conectamos con el archivo y lo abrimosen segundo plano
With x
.Workbooks.Open FileName:=archivo_incoming
'leeemos el contenido de la celda A1
text1=worksheets(1).cell(1,1)
'quitamos la aplicacion
.Application.Quit
End With
'liberamos de la memoria el archivo
Set x = Nothing
Saludos te recomiendo la segunda opción que es la que más utilizo
suerte
