Paste not working

[shawleigh17]

The code below worked fine up until about 5 minutes ago. I didn't change anything on the page, so I have no idea what caused this to start failing, but When I try to ActiveSheet.Paste, I get an error saying that I can not paste. ANy suggestions?

    Workbooks(filename).Activate
    Sheets("Analyze_Layout").Unprotect ("XXXXXX")
    Sheets("Analyze_Layout").Visible = True
    
    Sheets("Print_Layout").Visible = xlVeryHidden
    
    Workbooks(filename).Activate
    Sheets("Layout_Manager").Select
    Application.Goto Reference:="Layout_Manager"
    Selection.Copy
    Sheets("Analyze_Layout").Select
    Application.Goto Reference:="Layout_Manager"
    ActiveSheet.Paste

 

[shawleigh17]

After running the code step by step, just prior to the activesheet.paste, I instead went to the sheet and pasted it myself. Excel immediately crashes, and restarts. I have no idea why this is happening, and it was working fine just a while ago. Any help?