Abrir archvios

pemiro
09 de Marzo del 2006
Hola no he podido resolver mi duda sobre como abrir un archivo de excel desde un boton creado en un formulario de VB. El ejercicio es este. He diseñado una hoja de trabajo en excel el archivo se llama datos.xls, ahora, tengo en VB un formulario con un boton donde al oprimirlo la idea es que me abra el archivo datos.xls, no he podido lograr esto, lo maximo que he podido hacer es que al oprimir el boton me abra el programa de excel pero con una hoja nueva. Como hago para poder abrir Excel y de una vez el archivo Datos.xls?

Mi gracias

Pedro Miguel

epa
09 de Marzo del 2006
Buenas.

Pon en un modulo:
Public Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long

Public Const SW_SHOWNORMAL = 1

Luego en el boton:

Private Sub Boton1_Click()
VariableVacia = ShellExecute(me.hwnd, vbNullString, "unidadrutadatos.xls", vbnullstring, "C:", SW_SHOWNORMAL)
End Sub

De esta forma abres el archivo con su programa predeterminado