Add prefix to re-name sheet

[Mayweed]

This code works fine for naming a new sheet with todays date and increment but does anyone know how to prefix it with something?
For example: instead of "01-31-11-(1)" it would re-name to "Sail-01-31-11-(1)" then "Sail-01-31-11-(2)" and so on.

ActiveSheet.Name = Format(Now(), "mm-dd-yy") & " (" & x + 1 & ")"