Abrir Archivo Externo a Excel

25/11/2009 - 20:59 por Guli | Informe spam
Hola!!
Desde ya, muchas gracias de antemano!!!!
Como se puede, a través de código Vba, abrir un archivo que es ajeno a
Excel??? Por ejemplo *.jpg ó *.mp3 ó algo por el estilo!!!
Muchas gracias!!!
Saludos,

Guli
 

Leer las respuestas

#1 Héctor Miguel
25/11/2009 - 22:40 | Informe spam
hola, chicos !

(creo que) tambien valdria la pena probar con los hipervinculos (?) p.e.

activeworkbook.followhyperlink "ruta\y carpetas al\archivo.xyz"

puedes usar previamente el metodo getopenfilename

saludos,
hector.

__ OP y previo __
Como se puede, a traves de codigo Vba, abrir un archivo que es ajeno a Excel???
Por ejemplo *.jpg ó *.mp3 ó algo por el estilo!!!



A continuacion tienes un ejemplo:

Private 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

Sub prueba()
nombrefich = Application.GetOpenFilename
ejecutar = ShellExecute(0, "Open", CStr(nombrefich) & vbNullString, vbNullString, vbNullString, 1)
End Sub

Preguntas similares