Hi all,

I am having the this problem. My paste method fails. I run my code in MS Excel 2010 and it fails
while the same time if I run it on MS Excel 2003 it works perfectly. Can anyone help? Here is my code:


Thanks in advance


Sub APOTH_ASFALEIAS()
                           
Sheets("FORMULAS(HIDDEN)").Select
ActiveSheet.Unprotect

                Sheets("FORMULAS(HIDDEN)").Select
                Range("DA1:EZ600").Select
                Selection.ClearContents


        Sheets("INPUT SHEET").Select
        Range("A1:AZ600").Select
        Selection.Copy
        Sheets("FORMULAS(HIDDEN)").Select
        Range("DA1:EZ1").Select
'---Here it fails---
        ActiveSheet.Paste

Sheets("FORMULAS(HIDDEN)").Select
ActiveSheet.protect