Fejl i makro

Jeg har lavet en makro, som i sig selv fungerer fint, men når jeg sætter den ind i en knap, oprettet som kontrolelement, stopper makroen.

her er makroen
Private Sub Ruder2knap_Click()
'
' Ruder2 Makro
' Makro indspillet 29-08-2007 af Zamorano
'

'
    Sheets("kortvalg").Select
    Range("B10:P13").Select
    Range("B13").Activate
    Selection.Cut
    Range("A10").Select
    ActiveSheet.Paste
    Range("I11").Select
    ActiveCell.FormulaR1C1 = "Ruder 2"
    Range("I12").Select
    ActiveCell.FormulaR1C1 = "2"
    Range("I13").Select
    ActiveCell.FormulaR1C1 = "r"
    Range("I14").Select
    Sheets("Forside").Select
End Sub

jeg har kopieret makroen fra denne makro, som fungerer fint.

Sub Ruder2()
'
' Ruder2 Makro
' Makro indspillet 29-08-2007 af zamorano
'

'
    Sheets("kortvalg").Select
    Range("B10:P13").Select
    Range("B13").Activate
    Selection.Cut
    Range("A10").Select
    ActiveSheet.Paste
    Range("I11").Select
    ActiveCell.FormulaR1C1 = "Ruder 2"
    Range("I12").Select
    ActiveCell.FormulaR1C1 = "2"
    Range("I13").Select
    ActiveCell.FormulaR1C1 = "r"
    Range("I14").Select
    Sheets("Forside").Select
End Sub

Jeg får fejlen:

run-time error '1004'
metoden Select for klassen Range mislykkeds.

Hvad skal jeg gøre?

mvh Lars