Returns an object that represents the active sheet in the specified workbook. Returns Nothing if no sheet is active. Read-only.

Workbook.ActiveSheet.Name := 'NewName';