Ok, I have a really bizarre problem...

I have a workbook "file1". If I open file1 and make any chnage such as
changing the test of a header cell and save file1 as file2 and close it. I
can then open file2 but if I make a similar little change to file2 and save
as file3 and close. When I try to open file3 I get an error from excel that
says

"Microsoft Excel has encountered a problem and needs to close. We are sorry
for the inconvenience."

It tries to repair the file3 but if I view the repairs it indicates that the
prblems were so extensive that it could not be repaired.

The original file1 I don't think has anything special about it. Some
formulas referring to cells in other sheets of the same file, some drop down
lists. There is a worksheet function (code below) but even if I delete this
code I have the same problem. Even if I delete all the sheets the problem
persists.

Does anyone have any idea why this would be happening ???

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Cells.Count 1 Then Exit Sub
If Intersect(Range("B31:B126"), Target) Is Nothing Then Exit Sub

Application.EnableEvents = False
Application.Calculation = xlCalculationManual


Application.Run "VarMacro.xls!update5mBlotter" ' another workbook
Application.Run "VarMacro.xls!updateHourBlotter" ' another workbook

Application.EnableEvents = True
Application.Calculation = xlCalculationAutomatic

End Sub