ich habe schon alles was hier im Forum und bei Google steht versucht, leider ohne Erfolg.
Vielen Dank für Eure Hilfe!
Mfg. Jens
Shell Environ$("COMSPEC") & " /c Start C:\Temp\wdr.mp4"
Auf Firmen PCs kann das Probleme machen. :-)Option Explicit
Public Sub Main()
Dim varPathFile As Variant
Dim objShell As Object
varPathFile = "C:\Temp\1 2 3 4\wdr.mp4"
Set objShell = CreateObject("Shell.Application")
objShell.Open varPathFile
Set objShell = Nothing
End Sub
ServusShell Environ("COMSPEC") & " /c """"C:\Temp\1 2 3 4\wdr.mp4"""", vbNormalFocus"
Servus