c'est plus un problème de ligne de commande de VLC que de VBA
avec la version 1.0.2 de VLC, j'utilise :
Dim ID As Variant, playlist As String, lignedecommande As String, C As Range
For Each C In Selection
If playlist <> "" Then
playlist = playlist & " " & Chr(34) & "D:\Musique\" & Cells(C.Row, 1) & Chr(34)
Else
playlist = Chr(34) & "D:\Musique\" & Cells(C.Row, 1) & Chr(34)
End If
Next
lignedecommande = """C:\Program Files\Videolan\VLC\VLC.exe " & Chr(34) & "--one-instance --playlist-enqueue " & playlist
End If
ID = Shell(lignedecommande & "", vbNormalFocus)
les noms de mes fichiers mp3 étant rangés dans la colonne A