AnsweredAssumed Answered

shell.application multiple file selection

Question asked by Damon Frashure on Apr 13, 2016
Latest reply on Apr 14, 2016 by Damon Frashure
Branched to a new discussion

I have a macro that pulls all the files from a directory and does stuff to them.  I would like to modify the macro though to allow me to select particular files within a directory. Below is the section of code that pulls files in from the shell application but I can't find a way create a multiselect dialog box in this.  Does anyone have any thoughts or links they could send?



        filter = "\*.sldprt"

        docType = swDocumentTypes_e.swDocPART


    Dim shellApp As Object

    Set shellApp = CreateObject("Shell.Application").BrowseForFolder(0, "Please select an input folder", 0, "")


    Dim inputPath As String

    inputPath = shellApp.Self.Path


    file = Dir(inputPath & filter)