Worksheet.Name procedure builder

Worksheet.Name (Excel)

Returns or sets a String value that represents the object name.

' 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