probleem met een spatie in een pathname

[cow18]

onderstaande gebruik ik om op een snelle manier een array met alle files in een path en onderliggende subdirectories te krijgen.

 mijnfiles = Split(CreateObject("WScript.Shell").Exec("cmd /c dir " & mijndir & " /b /a-d /s ").StdOut.ReadAll, vbCrLf)   'idem, alle files in die subdirectorie en onderliggend

probleem is nu, in dat path staat/staan er spatie(s) en het zaakje werkt niet.
Heb het ook via de systeemprompt geprobeerd en inderdaad analoog, geen resultaat.
Ik zou als het ware eerst moeten kunnen een cd (change directory) doen, het zaakje dan laten lopen en dan terugkeren, in een soort batchfile, is te doen, maar is er een eenvoudiger weg ???

 

[snb]

Gewoon tussen haakjes zetten:

mijnfiles = Split(CreateObject("WScript.Shell").Exec("cmd /c dir """ & mijndir & """ /b /a-d /s ").StdOut.ReadAll, vbCrLf)


Of alle padnamen met spaties wijzigen.

 

[cow18]

het zit hem soms in een pietluttig detail, weer iets geleerd, hopelijk onthoud ik het.
thanks !!!

De namen wijzigen was geen optie, het is niet voor mijzelf.

 

[snb]

Je hebt nu een methode om met VBA in alle padnamen spaties door underscores te vervangen.....