Returns a Worksheet object that represents the worksheet containing the specified range. Read-only.
Example
This example displays the name of the worksheet that contains the active cell. The example must be run from a worksheet.
MsgBox ActiveCell.Worksheet.Name
This example displays the name of the worksheet that contains the range named "testRange."
MsgBox Range("testRange").Worksheet.Name