Visual Basic para Aplicaciones - Método Cut y Paste

Necesito usar los métodos Cut y Paste para trabajar sobre una planilla excel, pero solo he logrado que corte (creo) pero no he conseguido que me pegue un determinado rango de datos en una celda específica. Lo que tengo es esto:

para cortar :

Private Sub CommandButton1_Click()
Range("c10:c20").Cut
End Sub

y para pegar esto:

Private Sub CommandButton2_Click()
Sheets("hoja1").Select
Range("a1").Select
activeshet.Paste
End Sub

pero me aparece un error al intentar pegar el rango de datos. Me sale: "Se ha producido el error '424' en tiempo de ejecución. Se requiere un objeto." Y me marca la línea : activeshet.Paste

Agradecería muchísimo si alguien pudiera ayudarme con esto. Muchas gracias

¿También en el código escribiste "shet", ó solamente en la consulta??

anoche me di cuenta de eso, no lograba entender, por más vueltas que le daba, qué estaba mal. No entendía el por qué del error ya que yo estaba seguro que estaba bien, pero era eso. (activeshet.Paste por activesheet.Paste )