Position cellule en haut de la feuille

Bonjour à toutes et tous.

C'est tout bête; mais je voudrais améliorer ce code :

Private Sub CommandButton1_Click()
Range("R24").Select
End Sub

pour que la cellule R24 s'affiche en 1ere ligne et 1ere Colonne
(En fait, en haut à gauche de ma feuille active)
et non plus ou moins au milieu de l'écran.


Merci d'avance