Autres Lancer Vlc par Vba

Staple1600 à dit:

Bonjour

Test OK sur mon PC

VB:

Sub test_B()
Dim sVLC$, Chemin$, MaVideo$
Chemin = "C:\Users\Staple\Documents\TESTS\" ' à adapter
MaVideo = Chemin & "fichierVIDEO.mp4" ' à adapter
sVLC = "C:\Program Files (x86)\VideoLAN\VLC\vlc.exe" ' à adapter si besoin
Call Shell("""" & sVLC & """ """ & MaVideo & """", 1)
End Sub

EDITION: Bonsoir Marcel32, je n'avais pas rafraichi le navigateur 😉

Cliquez pour agrandir...

Marcel32 à dit:

Bonjour,

Tu peux essayer ceci :

VB:

Sub TestOuvrirVlc()
'
    Chem = "Chemin"
    Fichier = "Video a visionner.mkv"

    Shell """C:\Program Files\VideoLAN\VLC\Vlc.exe"" """ & chem & fichier & """"
End Sub

Ou un truc qui, perso, me semble plus clair :

VB:

Sub TestOuvrirVlc()
'
    MonPlayer = "C:\Program Files\VideoLAN\VLC\Vlc.exe"
    MonChemin = "Chemin"
    MonFichier = "Video a visionner.mkv"

    Shell Chr(34) & MonPlayer & Chr(34) & Chr(32) & Chr(34) & MonChemin & MonFichier & Chr(34)

End Sub

Cliquez pour agrandir...