problemer med at selecte sheet

Hejsa,
Håber der er nogen, der kan hjælpe her.
Jeg kopier et sheet i Excel og navngiver det på baggrund af en variabel, der vedhæfter dato i enden

Sub Rename_Sheet()
Dim myDate As Date, aDate
myDate = Date + 7 - Weekday(Date)
aDate = Format(myDate, "mm.dd.yyyy")

    Sheets("xxx").Select
    Sheets("xxx").Copy After:=Sheets(4)
    Sheets("xxx (2)").Select
    Sheets("xxx (2)").Name = "Sales Contribution " & aDate

Problemet er, at jeg bagefter gerne vil selecte sheetet, som er navngivet ud fra dato.
Jeg har prøvet at selecte det sådan her, men det virker ikke.

Sheets("Sales Contribution " & aDate").Select

Nogen der ved, hvordan jeg kan selecte det?
På forhånd tak :)
mvh
Lasse