Application.SelectSpreadsheetDialog

This function brings up a dialog to select a data set for an analysis.

Syntax Parameters Return Value 
Function Application.SelectSpreadsheetDialog( _
    RequireInputSpreadsheet As Boolean) As Object
 RequireInputSpreadsheet [in]

Whether to allow selecting non-input spreadsheets.

Type: Boolean

Object

SVB Example

Prompting the user for a spreadsheet: 

Option Base 1
Option Explicit
Sub Main
    'Open a spreadsheet, but allow it to also be able to open output spreadsheets
    Dim Spr As Spreadsheet
    Set Spr = Application.SelectSpreadsheetDialog(False)
End Sub