Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Autres Lancer Vlc par Vba

bernardrustrel

XLDnaute Occasionnel
Bonsoir
Je fais appel a vos compétences car je voudrais lancer des video au travers d'un appli VBA sous excel 2007. Voici ce que j'ai écrit:

Sub TestOuvrirVlc()

Chem = "Chemin\"
Fichier = "Video a visionner.mkv"
Shell """C:\Program Files\VideoLAN\VLC\Vlc.exe"" ""Chemin\ Video a visionner.mkv """
End Sub
Cela fonctionne parfaitement or je voudraios ma servir des variables Chemin et Fichier alors là chou blanc et je tourene en rond à y perdre mon latin.

Voici mon propos qui ne fonctionne pas

Sub TestOuvrirVlc()

Chem = "Chemin"
Fichier = "Video a visionner.mkv"
Shell """C:\Program Files\VideoLAN\VLC\Vlc.exe"" Chem & Fichier Video a visionner.mkv """
End Sub

Alors si l'un de vous avait une suggestion, je l'en remercie par avance.
Cordialement, Bernard.
 

TooFatBoy

XLDnaute Barbatruc
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
 
Dernière édition:

Staple1600

XLDnaute Barbatruc
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
 

bernardrustrel

XLDnaute Occasionnel
Bonjour Merci de votre aide,
j'ai rectifie mes ecritures, ou je me trompais sur le nombre de ""

merci encore, cordialement, Bernard
 

bernardrustrel

XLDnaute Occasionnel
Bonjour Merci de votre aide,
j'ai rectifie mes ecritures, ou je me trompais sur le nombre de ""
merci encore, cordialement, Bernard
 

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…