Erreur d'exécution d'une formule - comment corriger ?

Bonjour,

j'ai suivi un tutora sur YouTube sur la création d'un formulaire de saisie à partir du code VBA (je suis Débutant). 

Le formateur avait utilisé cette formule pour rattacher un bouton à une feuille Excel.

Private Sub btnSource_Click()

    Sheets("Source").Activate
    Range("A5").Select

End Sub

Cependant

J'ai utilisé la formule ci-dessous mais je reçois un message disant : 

Erreur d'exécution 9 (L'indice n'appartient pas à la sélection)

Private Sub btnSource_Click()

    Sheets("Source").Activate
    Range("A1").Select

End Sub

Merci en avance

Windows / Chrome 139.0.0.0