Hi Everyone,

Does anyone know why I would get this error message?

Here's the code:
Sub Comp_Button()

Sheets("Input Form").Unprotect "password"
Range("D12,D13,D14,D15,D17,D22,D24,D26,D29,D30,D31 ,D32,G32,A55,A57,A59").Select
Selection.CheckSpelling

Range("Y29:BG29").Select
Selection.Copy
Sheets("REFUND SPREADSHEET").Activate
'Range("A4").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,
SkipBlanks _
:=False, Transpose:=False
Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _
SkipBlanks:=False, Transpose:=False
End Sub