Worksheet.Name (Excel)

Devuelve o establece un valor de tipo String que representa el nombre del 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