Свойство ActiveSheet

Возвращает объект, представляющий активный лист в рабочей книге. Только чтение TXLSWorksheet

Workbook.ActiveSheet.Name := 'NewName';