Select the Name of the Worksheet with InputBox

Hi,

Could someone let me know how to Select the Name of the
Worksheet which has the Data with the help of an Input
box.

Right now in my Macro I am providing the user with an
option to select the Excel file. The code is as follows:

Sub OpenOneFile()

ExcelFile1 = Application.GetOpenFilename("Excel-
files,*.xls", _
1, "Select Input File To Open", , False)
If TypeName(ExcelFile1) = "Boolean" Then Exit Sub

Debug.Print "Selected file: " & ExcelFile1
Workbooks.Open ExcelFile1
End Sub


After selecting the Excel File, the user must be Provided
with an option to select the Excel Sheet which has the
needed Data. How do I do this????

I appreciate any help.
Thanks,
Neeraja.

see one suggestion at your other post.

Neeraja wrote:

Hi,

Could someone let me know how to Select the Name of the
Worksheet which has the Data with the help of an Input
box.

Right now in my Macro I am providing the user with an
option to select the Excel file. The code is as follows:

Sub OpenOneFile()

ExcelFile1 = Application.GetOpenFilename("Excel-
files,*.xls", _
1, "Select Input File To Open", , False)
If TypeName(ExcelFile1) = "Boolean" Then Exit Sub

Debug.Print "Selected file: " & ExcelFile1
Workbooks.Open ExcelFile1
End Sub

After selecting the Excel File, the user must be Provided
with an option to select the Excel Sheet which has the
needed Data. How do I do this????

I appreciate any help.
Thanks,
Neeraja.

--

Dave Peterson