Versiones Excel
Publicado por Jose Gpe Sanz (75 intervenciones) el 08/09/2008 21:32:20
Ayuda Foro..!
En primer lugar tengo una version de excel del 2002
y aplico este codigo para abrir un archivo de musica
Option Explicit
Declare Function apiShellExecute 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
Declare Function apiGetForegroundWindow Lib "user32" Alias "GetForegroundWindow" () As Long
Sub ALEJANDRO()
Call apiShellExecute(apiGetForegroundWindow, "Open", "C:MisicaAlejandro Fernadez_Cuando yo queria ser grande.MP3", "", "", 1)
End Sub
hasta aqui todo bien si lo abre perfectamente
pero cuando paso el archivo a otra computadora con excel version 2003
no me abre el archivo.... que hago hay alguna forma de que pueda abrirlo en cualquier version....?
En primer lugar tengo una version de excel del 2002
y aplico este codigo para abrir un archivo de musica
Option Explicit
Declare Function apiShellExecute 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
Declare Function apiGetForegroundWindow Lib "user32" Alias "GetForegroundWindow" () As Long
Sub ALEJANDRO()
Call apiShellExecute(apiGetForegroundWindow, "Open", "C:MisicaAlejandro Fernadez_Cuando yo queria ser grande.MP3", "", "", 1)
End Sub
hasta aqui todo bien si lo abre perfectamente
pero cuando paso el archivo a otra computadora con excel version 2003
no me abre el archivo.... que hago hay alguna forma de que pueda abrirlo en cualquier version....?
Valora esta pregunta
0