"Errors were detected while saving ******.xlsm"

[Geshwinn]

Hi guys,

I keep getting this message for a file I am working on and basically cannot save it. I am using excel 2010.

After I click continue it tries to save everything to a new file and gives me the error that the damage was too extensive and cannot save it.

Yesterday I lost more than 150 lines of VBA code. Today I am trying with less (just 4 For... next loops) and still doesn't work.

Can you help?

 

[Derek Brown]

If you lost 150 lines, I wonder how many lines you have in your code module.
I know there are some limits but don't know what they are - I tend to keep my code modules to a managable size.
Have a look at:
http://www.eng-tips.com/viewthread.cfm?qid=280332&page=1

 

[Geshwinn]

I found what caused the problem but I don't know why.
It turned out that it was not the VBA code but the data I paste in one of the sheets.

When I paste it like it is - with source formatting I cannot save the file.
If I paste the values only it works like a charm.

I think I need an exorcist...

 

[MikeDBMan]

I am having this problem. I have graphics that I am copying from another File into the one that I can't save. If I delete all the graphics I can save. But How can I paste so I can save. Here is the code I am using:

Dim DrObj
Dim Pict


                            For Each Pict In DrObj
                               If Pict.Name = "Picture " & PictureCounter Then
                                    Pict.Select
                                    Application.ScreenUpdating = True
                                    Pict.Copy
                                    
                                    Exit For
                                End If
                            Next

...then later
                            ActiveSheet.Paste