Prevent Size Increase With Formulas

[adamsm]

Hi anyone,

I'm facing a situation where my workbook suddenly increased in size from 24kb to 1mb.

I have only four sheets in my workbook where one worksheet contains only formula.

I've tried the code in

http://www.vbaexpress.com/kb/getarticle.php?kb_id=83

But it does not work for me. I'm getting the debug message by highlighting the line
[vba] Do Until .CDo Until .Cells(j, k).Left > Shp.Left + Shp.Widthells(j, k).Left > Shp.Left + Shp.Width[/vba]
Any help on this would be kindly appreciated.

Note: I"m using Microsoft Excel 2007

Thanks in advance.

[Benzadeus]

Have you considered copying all the contents of each Worksheet and pasting in another new blank Workbook?
Do this test:
1 - Copy and paste all formula and values from one workbook to another, save it and check the size.
2 - Copy and paste formats. Check the size.

[adamsm]

Thanks for the help. But what if the new blank Workbook gets increased in size?

After some adjustment or addition of another sheet with formulas?

I'm saying this because this has happened with the current workbook i'm having.

Any suggestion on this would be kindly appreciated.

Thanks in advance.

[Benzadeus]

To tell the truth, I really don't know why your workbook increased the size that much. It's just I've had this problem in the past and I usually find out what is wrong.

But what if the new blank Workbook gets increased in size?

We will try another approach, so try the steps I suggested.

[adamsm]

Thanks for the recommendation. I'll look into that and let you know the response.