Worksheet.Name (Excel)

Retorna ou define um valor String que representa o nome do objeto.

' This macro sets today's date as the name for the current sheet 
Sub NameWorksheetByDate() 
    'Changing the sheet name to today's date
    ActiveSheet.Name = Format(Now(), "dd-mm-yyyy")

    'Changing the sheet name to a value from a cell
    ActiveSheet.Name = ActiveSheet.Range("A1").value
End Sub