Grouping worksheets so they all open at once?

[Malthus101]

Hello

I currently open 6 separate worksheets every morning to use throughout the day.

Rather than opening each one individually from the recent list, is there a way to group them (into a folder or something) so that with a single click I can open all 6 at once?

Thanks.

 

[BigBeachBananas]

Hello

I currently open 6 separate worksheets every morning to use throughout the day.

Rather than opening each one individually from the recent list, is there a way to group them (into a folder or something) so that with a single click I can open all 6 at once?

Thanks.

Do you mean workbooks? Assume you have all the workbooks you wanted to open in a folder.

Sub OpenWorkbooksInFolder()
    Dim FolderPath As String
    Dim FileName As String
    Dim wb As Workbook
    
    FolderPath = "C:\YourFolderPath\" ' Update with your folder path
    
    If Dir(FolderPath, vbDirectory) = "" Then
        Exit Sub
    End If
    
    Application.DisplayAlerts = False
    
    FileName = Dir(FolderPath & "*.xlsx") 'Update extension if needed
    
    Do While FileName <> ""
        Set wb = Workbooks.Open(FolderPath & FileName)
        FileName = Dir
    Loop
    
    Application.DisplayAlerts = True
End Sub

 

[Legacy 143009]

Put the all files in a folder.
In the same folder, create a new .txt file. Make sure the file extensions are visible in Explorer settings. Rename the .txt file as "OpenMultipleFiles.vbs"
Right click to file and click Edit.
Paste the code below into file:

Set WshShell = WScript.CreateObject("WScript.Shell")
strCurDir = WshShell.CurrentDirectory
Set xlObj = CreateObject("Excel.Application")
xlObj.visible = True
xlObj.Workbooks.Open(strCurDir & "\Workbook1.xlsx")
xlObj.Workbooks.Open(strCurDir & "\Workbook2.xlsx")
xlObj.Workbooks.Open(strCurDir & "\Workbook3.xlsx")
xlObj.Workbooks.Open(strCurDir & "\Workbook4.xlsx")
xlObj.Workbooks.Open(strCurDir & "\Workbook5.xlsx")
xlObj.Workbooks.Open(strCurDir & "\Workbook6.xlsx")

Replace the file names with yours. Save and exit. You can click all the files at once by only double-clicking this file.

 

[Malthus101]

Thanks! Both look doable...

But technically speaking, which is better to use? WScript or VBA?

Thanks.

 

[Legacy 143009]

You can embed @BigBeachBananas 's solution in a Workbook_Open event of one of the workbooks and the other workbooks will open eventually.
My solution opens all at once. Functionally they are the same. With my solution, you don't have to save none of the files as xlsm -if this is an issue.

 

[Malthus101]

OK thank you. I'll give it a go.....