je voudrais si c'est possible à partir d'une image ou d'un bouton pouvoir
lancer un fichier style video.avi qui lancerait WMP ??
Es ce que cela est faisable avec excel ????
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Daniel.j
Bonjour Essaie avec cela : =================== Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" _ (ByVal hwnd As Long, ByVal lpszOp As String, _ ByVal lpszFile As String, ByVal lpszParams As String, _ ByVal lpszDir As String, ByVal fsShowCmd As Long) _ As Long Const SW_SHOWNORMAL = 1 Public Sub StartDoc(ByVal szDoc As String) Dim lRet As Long lRet = ShellExecute(0, "Open", szDoc, "", "C:", SW_SHOWNORMAL) End Sub
Sub test() StartDoc ("C:ajeteraa.avi") 'a modifier End Sub ============= Daniel
"Knpc" a écrit dans le message de news:
Bonjour,
je voudrais si c'est possible à partir d'une image ou d'un bouton pouvoir lancer un fichier style video.avi qui lancerait WMP ?? Es ce que cela est faisable avec excel ????
Bonjour
Essaie avec cela :
=================== Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" _
(ByVal hwnd As Long, ByVal lpszOp As String, _
ByVal lpszFile As String, ByVal lpszParams As String, _
ByVal lpszDir As String, ByVal fsShowCmd As Long) _
As Long
Const SW_SHOWNORMAL = 1
Public Sub StartDoc(ByVal szDoc As String)
Dim lRet As Long
lRet = ShellExecute(0, "Open", szDoc, "", "C:", SW_SHOWNORMAL)
End Sub
Sub test()
StartDoc ("C:ajeteraa.avi") 'a modifier
End Sub
============= Daniel
"Knpc" <Knpc@discussions.microsoft.com> a écrit dans le message de news:
51F325F0-B227-4EE1-BEC3-8AE4A9DB9B85@microsoft.com...
Bonjour,
je voudrais si c'est possible à partir d'une image ou d'un bouton pouvoir
lancer un fichier style video.avi qui lancerait WMP ??
Es ce que cela est faisable avec excel ????
Bonjour Essaie avec cela : =================== Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" _ (ByVal hwnd As Long, ByVal lpszOp As String, _ ByVal lpszFile As String, ByVal lpszParams As String, _ ByVal lpszDir As String, ByVal fsShowCmd As Long) _ As Long Const SW_SHOWNORMAL = 1 Public Sub StartDoc(ByVal szDoc As String) Dim lRet As Long lRet = ShellExecute(0, "Open", szDoc, "", "C:", SW_SHOWNORMAL) End Sub
Sub test() StartDoc ("C:ajeteraa.avi") 'a modifier End Sub ============= Daniel
"Knpc" a écrit dans le message de news:
Bonjour,
je voudrais si c'est possible à partir d'une image ou d'un bouton pouvoir lancer un fichier style video.avi qui lancerait WMP ?? Es ce que cela est faisable avec excel ????