Need help opening files based on user input

[andreroux1]

Good day all I need to do a macro, where the user is prompted for input, which can be any value from 1 to 50. the input must then be combined with ".xls (resulting in a filename for example 5.xls if the user entered "5" at the ptompt.) Once that is done, I need to open the files with the same names in 3 different folders (for example c:\documents\folder A, c:\documents\folder B and c:\documents\folder C). I am not familiar enough with VBA or SQL to do this in a macro. Anyone with ideas?

 

[alansidman]

Try this:

Option Explicit


Sub OpenThree()
    Dim FileNr As Integer
    FileNr = InputBox("Provide a File Nr between 1 and 50")
    Dim FileA As String, FileB As String, FileC As String
    FileA = "c:\documents\folder A\" & FileNr & ".xls"
    FileB = "c:\documents\folder B\" & FileNr & ".xls"
    FileC = "c:\documents\folder C\" & FileNr & ".xls"


    Workbooks.Open FileA
    Workbooks.Open FileB
    Workbooks.Open FileC


End Sub

 

[Joe4]

Cross-posted: Need help opening files based on user input

While we do not prohibit Cross-Posting on this site, we do ask that you please mention you are doing so and provide links to the other thread (see rule #13 here: http://www.mrexcel.com/forum/board-announcements/99490-forum-rules.html). This way, other members can see what has already been done in regards to a question, and do not waste time working on a question that may already be answered.