Returns a Sheets collection that represents all the selected sheets in the specified window. Read-only.
For information about returning a single member of a collection, see Returning an Object from a Collection.
Example
This example displays a message if Sheet1 is selected in Book1.xls.
For Each sh In Workbooks("BOOK1.XLS").Windows(1).SelectedSheets
If sh.Name = "Sheet1" Then
MsgBox "Sheet1 is selected"
Exit For
End If
Next