Lo muevo a VB porque la respuesta son macros (y son lo más parecido)
Sub Completardia()
On Error Resume Next
Nombrehoja = Format(Now(), "ddmmm")
Sheets(Nombrehoja).Select
If Err.Number > 0 Then
Sheets(1).Copy After:=Sheets(Sheets.Count)
Sheets(Sheets.Count).Name = Nombrehoja
Sheets(Nombrehoja).Range("A1").Value = ""
'Ejemplo de una celda que sería borrada
Err.Clear
Else
MsgBox "Ya existe una hoja para la fecha actual"
End If
End Sub
Buenas, la macro sería algo así, espero entiendas algo de esta para poder modificarla a tu gusto
Si te manejas más o menos con estas entonces sabrás que para ejecutarlas o bien lo haces desde el editor de visual basic (integrado en el office), desde el listado de macros, desde un botón con la macro asignada, o bien lo metes en:
Private Sub Workbook_Open()
'Aqui el resto
End Sub
Y de este modo se ejecuta en cada apertura del libro
Saludos