Problem bei Blatt / Zellenauswahl

ich habe ein Problem in meinem Makro.

Ich wähle ein neues Sheet aus und will dann alle Zellen markieren. Der Code funktioniert mit Sheet1 problemlos, bei Sheet2 gibts folgende Fehlermeldung :

Runtime error 1004
Select method of Range class failed

Der Code :

Sheets("Sheet2").Select
Cells.Select ----> hier die Fehlermeldung
Selection.ClearContents

Bin für jeden Tipp dankbar :D

Danke

Martin