Opening workbook with multiple worksheets

[tiredofit]

Using this, I can choose a file to open:

Dim Selector As FileDialog

Set Selector = Application.FileDialog(msoFileialogOpen)

Selector.Show

Dim Selected As Boolean

If Selected Then Selector.Execute

Dim wb As Workbook

Set wb = ActiveWorkbook

Dim MyVal

MyVal = wb.Worksheets(1).Cells(1,1).Value

However, what happens if the chosen file contains more than a single worksheet?

How can I specify the specific worksheet?

Thanks

 

[Fluff]

Like

myVal = wb.Worksheets("[COLOR=#ff0000]MySheet[/COLOR]").Cells(1, 1).Value

Change sheet name to suit

 

[tiredofit]

Like

myVal = wb.Worksheets("[COLOR=#ff0000]MySheet[/COLOR]").Cells(1, 1).Value

Change sheet name to suit

Thanks

 

[Fluff]

You're welcome