Comando row

Alguien me podría decir porque me da error 13 este código:

Sub Botón3_AlHacerClic()

Dim Fila
Dim FilaMenos
Fila = Range("C2").Value
FilaMenos = Fila - 1
If Fila > 8 Then
Sheets("Acumulado").Select
Rows("FilaMenos:Fila").Select ' Aqui es donde me da error 13
Selection.Copy
Selection.Insert Shift:=xlDown
' Range("B34").Select
Application.CutCopyMode = False

Else: MsgBox "Rellene correctamente con un número entero mayor que
ocho"
Hoja20.Activate

End If

End Sub

' Los valores de Fila y FilaMenos son correctos y si pongo valores en
esa linea el codigo funciona perfectamente.

Gracias